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1 • Introduction 

This report describes the internal structure of the first 
version of METAPHOR , an interactive software package to facilitate 
performability modeling and evaluation. A companion "User’s Guide" 
for METAPHOR (Version 1) is currently in the process of being 
documented. As the capability of METAPHOR is extended via 
incorporation of additional evaluation programs, revised or 
supplemented guides will be prepared in order to maintain an up-to- 
date documentation of the system. It is assumed that the reader is 
familiar with the context of METAPHOR, that is, the performability 
modeling and evaluation methods developed under the subject grant 
and described in a number ofprevious reports and publications [1]- 
[9]. 

As we currently envision METAPHOR, it is the prototype of a 
software package that, ultimately, will contain programmed tools to 
facilitate each step of performability model construction and model 
solution. I-n certain steps, such facilitation will take the form of 
complete automation; in other cases, particularly steps involving 
model construction, an interactive mode will be necessary wherein 
the programmed tool acts strictly as an aid. More specifically, the 
major steps to be facilitated are; 

1) Construction of the base model, 

2) Elaboration of the base model into a model hierarchy, 
Michigan Evaluation Aid for Perphormabil ity 
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3) Formulation of the capability function in terms of the 
interlevel translations between adjacent models- of the 
hierarchy, 

4) For each accomplishment level a, computation of the base 
model trajectory set Ua that corresponds to a, 

5) For each trajectory set Ua, computation of its probability 
(the performability value for accomplishment level a) - 

In addition to facilitating specific steps of the modeling and 

evaluation process, METAPHOR is intended to serve as a 

performability evaluation tutor for a person who is learning to use 

its programs. 

In developing Version 1 of METAPHOR, emphasis was placed on 
obtaining a general structure that can accommodate the various types 
of evaluation programs that are planned for the system. In 
addition. Version 1 contains specific programs which facilitate 
steps 1) and 5) outlined abov'e. Finally, the tutorial aspect of 
METAPHOR is fairly well developed in Version 1 with an extensive 
repertoire of HELP requests, along with a preprogrammed series of 

questions relating to specific topics. 

METAPHOR is written in APL [101- [11] # chosen because of its 
notational compactness and array handling abilities. However, the 
eventual translation of the prototype package into a faster and more 
portable language such as FORTRAN may be desired, and this report 
should also provide valuable documentation for such a process. A 
working knowledge of APL is necessary for a complete understanding 
at the lowest level. However, the descriptions contained herein are 
hopefully general enough so that, even lacking familiarity with APL, 
the essential mechanisms of the system should be apparent. 
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The appendix provides a complete listing of the METAPHOR 
package to date, with the functions organized into topical 
groupings. Various conventiohs utilized in the package are 
discussed in Section 2, and some techniques used for control and 
intrapackage information exchange are studied in Section 3. In 
Section 4, the various algorithms employed by METAPHOR for 
performability evaluation are treated. Descriptions of the global 
variables and some of the important local variables are then 
presented in Section 5, while Section 6 gives the interdependence of 
the METAPHOR functions. Finally, Section 7 presents an overview of 
each METAPHOR function, giving its calling sequence, purpose, global 
variables used, functions calling it, functions it calls, general 
comments, and listing. 

In those sections containing entries in alphabetical order, 
standard APL lexicographical ordering is employed: A, B, C, ..., X, 
Y, Z, 0, 1, 2, ..., 7, 8, 9, A, B, C, X, y, £, 0, 1^, 2, ..., 7, 
8, 9. 
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2 \ Conventions 


Several programming conventions dealing with various aspects of 
METAPHOR have been adopted. These are stated here to ease the 
process of absorbing the constructional details and to allow a more 
uniform product when modifications are made. In particular, 
conventions regarding the names of functions, variables, and labels 
have been established, and are examined in Sections 2.1-3. Finally, 
some other general conventions are discussed in Section 2.4. 

2. 1 Function Names 

The name of, each function is suggestive of its purpose, with 
the following guidelines. 

1) Each function controlling the execution of a command begins 
with " COMMAND " and ends with the name of the command it 
administers, e.g., COMMAMDA LTER . 

2) Each function that somehow obtains a value (either by 

asking the user or by generating it) begins with "GET," and 
ends with the name (or long abbreviation) of the item it 
fetches, e.g., GETACCLEVPROB, GETALTERVECTOR. 

3) Each function that prints information in response to a HELP 

command ends with "INFO" and begins with the first letters 
of major syllables of the function for which it is the 
information routine. These letters are also underlined. 
For example, the help response to the GETALTERVECTOR 

function is contained in GAV INFO. (See Section 3.1.) 

4) Each function that inputs information begins with "IN," 

viz., INPUT and INYES. 

5) Each function that outputs information begins with "PRINT," 
viz., PRINT, PRINTPERFORMABILITY, and PRINTQUAD. 

6) Each function that checks the validity of input information 
begins with "CHECK,” e.g., CHECKPROB. 

7) Each function that is utilized to input commands with 

arguments (namely BRIEF and ECHO, see Section 3.1) must be 
the name of the command. 
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The functions in the current METAPHOR package are listed in the 
appendix and in Section 7; the latter section also discusses each 
function, giving its purpose and commenting on its structure and 
behavior . 


2. 2 Variable Names 

As with function names, variable names are suggestive of their 
purpose. The patterns below have been maintained. 


1 ) 


Variables used to enter commands are the same 
commands themselves, e.g., ALTERS 'ALTER 
3.1.) 


names 

(See 


as the 
Section 


2) Variables used to identify other requests, e.g., ON and 
GIVEN, are the same names as the requests themselves. 

3) Variables used as calling function indicators for the HELP 
command, e.g., GAV and GBV , are the same abbreviations used 
to prefix the name of the information routines associated 
with the variables, i.e., GAVINFO and GBVINFO for the 
examples above. (See Section 3.2.1.) 

4) Variables used as flags to indicate whether certain other 
variables have been defined (e.g., DEFBASICVARIABLES and 
DEFF) begin with "DEF" and end with the variable name for 
which the variable is a flag. (See Section 3.2.2.) 

5) Commonly used abbreviations in labels are as follows: 

NUM NUMBER 

ACCLEV ACCOMPLISHMENT LEVEL 

PROB PROBABILITY 

TRI TRINARY 

TRAJ TRAJECTORY 

bin binary 

INFO INFORMATION 

EVAL EVALUATE 

COM COMMENT 

CALC CALCULATE. 
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2.3 Label Names 

Standard APL defines all labels to be local, that is, a label 
name used in function A will not be recognized (known) by some other 
function B. However, the version of APL implemented at The 
University of Michigan Computing Center defines labels globally , 
that is, each function is aware of every label in the package. If 
two different statements were given the same label, incorrect (and 
unpredictable) results may occur. Thus, in this version of 
METAPHOR, every label has been uniquely named. In addition, several 
other conventions regarding labels have been observed in the 
construction of METAPHOR and are stated below. 

1) Every label begins with the first letters of major 
syllables or key phrase segments of the function for which 
it is a label. These letters are also underlined. Below 
is a list of all such abbreviations. 


A 

COMMANDALTER 

CC 

COMMANDO OM 

CCALC 

COMMANDO A LC 

CHECK 

CHECKPOSI 

CTP 

CALCTRAJPROB 

D 

COMMANDDATA 

E 

ENCODE 

GAP 

GETACCLEVPROB 

GAV 

GETALTERVECTOR 

GBV 

GETBASICVARIABLES 

GDV 

GETDATAVECTOR 

GENHM 

GENERATEHMATRIX 

GENPM 

GENERATE PMATR IX 

GPV 

GETFVECTOR 

GG 

GGIVEN 

GGM 

GETGMATRICES 

GIV 

GETIVECTOR 

GN 

GNFAIL 

GNA 

GETNUMACCLEV 

GNBV 

GETNUMBASIC VARIABLES 

GNP 

GETNUM PHASES 

GNTS 

GETNUMTRAJSETS 

GS 

GETSTATES 

GW 

GETWALUES 

H 

COMMANDHELP 
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2 ) 


IN INPUT 

lY INYES 

MET METAPHOR 

PQ PRINTQUAD. 

Every label to a section involving 

the postfix "IN," e.g., GNPIN. 


some form of input has 


3) 


Every label denoting the start of a loop has the postfix 
"LOOP", e.g., ELOOP. 


4} Every label referencing a section dealing with the response 

to a particular input has the name of that input appended 

to the label. For example, the statement indicated by the 
label GENPMG I VEN is branched to (in the function 

GENERATEPMATRIX) after the reply "GIVEN" is input in 

response to the question "What type of P matrix?" 


5) All other labels reflect the purpose of the section 
referred to by the label. 


2.4 Other Conventions 

Other conformities and guidelines that have been followed are 
listed below. 

1) Names of commands do not exceed six characters in length. 
Also the set of letters comprising one command cannot be a 
subset (proper or otherwise) of the set of letters 
comprising another command. Thus, since EVAL is a command, 
no command can be named VALUE because E, V, A, and L all 
appear in VALUE; similarly, because of ALTER, LATER would 
be illegal. (For further explanation, see Section 3.1.) 

2) Names of matrix generator types, e.g., IDENTITY and NFAIL, 
cannot exceed eight characters in length. As with 
commands, the set of letters comprising one such type can 
not be a subset of the set of letters comprising another 
type . 

3) The parameter "Z" is used as the result argument i-n the 
definition of all functions which return a value, e.g., the 
definition of CHECKBIN is "Z CHECKBIN CHECKNO." 
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4) The variable IN is used to handle most input data. See 
Section 3,1 for details. 

5) Most program statements are written to be as clear as 
possible. Further, ample internal documentation (comments, 
etc.) has been incorporated throughout the package. 


3. Control Techniques 

Within the METAPHOR package, various methods of control and 
information exchange among the various functions are employed. The 
more important of these techniques are explained in the following 
sections. Section 3.1 examines the mechanics associated with the 
INPUT function, while Section 3.2 discusses the HELP and ALTER 
commands. Most other sections of METAPHOR employ straightforward 
control and information exchange techniques. 

3.1 INPUT 

Because of METAPHORS 's versatile input capabilities — namely 
being able to accept as input numerical data or commands with zero, 
one, or two modifiers — the input handling routine INPUT is 
necessarily somewhat complex. The techniques exercised in INPUT are 
outlined in this section. Figure 1 gives a flowchart of the 
function. Standard flowchart symbols are employed; in particular, a 
rectangle denotes a process, a diamond denotes a decision, and a 
rhomboid indicates some form of input or output. 

When the quad command (the APL "square") is placed to the right 
of a specif icatioh symbol (left arrow, <- ), input data from the 
user is required; APL prints a prompt symbol and interrupts program 
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Figure 1. Flowchart for the function INPUT 
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execution until an expression is entered to replace the quad. This 
expression can evaluate to either a numeric quantity or a character 
quantity. In METAPHOR, commands and other character information are 
input by entering the name of a variable containing a string 
corresponding to the desired input. Thus, for example, when a user 
types HELP, he is not providing the program with the string 'HELP', 
but rather a variable named HELP which contains a six character 
string 'HELP ', The variable HELP could of course contain any 
value. The decision to use the actual string as the internal value 
(instead of some arbitrary internal code, as say 17) was made so 
that if echoing were set on, the command input (rather than some 
internal code) would be echoed. 

The function INPUT must determine if the item input is a 
command or some form of numeric data. This is accomplished .by 
converting the input to a vector and then comparing the input to a 
list of all valid commands in the array COMMANDLIST. Presently this 
array contains 

.HELP~~ 

EXIT”" 

DATA~“ 

ALTER- 
CALC — 

ECHO- 

BRIEF" 

COM 

EVAL"" 

Here'"* denotes a blank. 

If the input is a command, the result of these computations 
will yield a 9x6 binary array with exactly one row consisting of all 
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I’s. By ANDing each row, a 9 element vector will result with a 1 in 
the column corresponding to the row of COMMANDLIST containing the 
command. As an illustration, suppose EVAL is input. The comparison 
of EVAL with COMMANDLIST produces 

011011 

100011 

010111 

100101 

011011 

100011 

000101 

000111 

mill 

and the ANDing of each row produces 000000001. Hence a command in 
indicated and it is the -ninth in the command list, viz., EVAL. The 
vector above is called COMMANDVECTOR in the function INPUT. Note 
that if ’VALUE’ were entered, the same result would follow. For 
this reason the restriction noted in Section 2.4 has been 
established: no command can consist of a set of letters which is a 

subset of the set of letters comprising another command. For 
instance, one could not define a command called CHOOSE because the 
letters in the command ECHO all appear in CHOOSE. Presently four 
commands consist of two words. These are BRIEF ON, 'BRIEF OFF, ECHO 
ON, and ECHO OFF. These commands may be conceptually considered one 
word commands {e.g., BRIEF) modified with a parameter (e.g., ON). 

The problem of entering commands with parameters, as for 
example BRIEF ON", is solved by defining a function which returns 
bhe proper values for the command. Thus, if the user inputs "BRIEF 
DN", APL executes the function BRIEF taking ON is an argument. 


3,1 INPUT 
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BRIEF then returns a twelve character vector to the quad (input) 
symbol; the first six characters of the vector are 'BRIEF ' and so 
INPUT can thus determine the nature of the command, while the second 
six characters is a representation of the argument 'ON ' and so 
CpMMANDBRIEF can determine the proper response to the command. Up 
to two such parameters could be defined for a command, more if the 
parameters were of similar nature. For instance, a command TEST 
could be defined with format 

A TEST B 

where A is a scalar and B is a one dimensional vector. Then a 
typical user input might be 

ALL TEST 1,5 7 9 

where ALL would be the name of some variable and 1, 5, 7, 9 would be 
the vector to be used by TEST. At present, only the single 
parameter commands BRIEF and ECHO are implemented in METAPHOR. 

If the input is determined to be a command, then using the 
variable COMMANDVECTOR, the program flow branches to a section of 
the function INPUT where the proper COMMAND routine is called. 
Finally, the variable IN is replaced with the code value 'COMMAND', 
and INPUT returns. Thus, when the function that requested input 
checks the variable IN, it will find that a command was executed, 
but that no data was entered. The function will then repeat its 
original query and again ask for input. 

If the input is determined to be specifically a HELP command, 
the function INPUT calls COMMANDH ELP with the parameter that is 
given as the second argument of the INPUT call, i.e., the value in 

METAPHOR (Version 1) Programmer's Guide 



13 


the parameter ROUTINE. This parameter contains a code identifying 

• I 

the function requesting 'INPUT. 

If, however, the user's entry to INPUT is determined not to be 
a command, it is assumed to be data. To insure that the data is the 
proper shape (dimension) , it is compared to the expected size given 
as the first parameter to INPUT, namely the parameter SHAPE. Since 
scalar or vector (i.e., no multidimensional array) entries are 
expected, the input is vectorized using the ravel {,) function. If 
the dimension is not as expected, an error message is printed and 
the user is again asked for input. As an example, suppose the user 
tells METAPHOR fin the function GETNUMPHASES) that his model 
contains 4 phases. METAPHOR then asks for the number of states in 
each phase (via the function GETSTATES) , expecting 4 values— one 
for each phase. If the user gives 5 values, an error message would 
be printed and the request for the states per phase would ' be 
repeated . 

All input acquired through the function INPUT is placed in the 
global variable IN. IN thus makes available to all functions the 
most recent item given METAPHOR. 
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3.2 User Assistance Commands 

Several of the user assistance commands, namely HELP, ALTER, 
and DATA, have somewhat involved control mechanisms. These 

techniques are treated within this section. 

3.2,1 HELP 

As mentioned in Section 3.1, the HELP command causes immediate 
execution of the function COMMANDH ELP . Associated with COMMANDHELP 
is a parameter (called ROUTINE) informing COMMANDH ELP of the 
function for which the user requires help. The sequence occurs as 
follows. Suppose some function, call it F, requires input from the 
user. Function F then calls the function INPUT and passes to INPUT 
an alphanumeric code indicating F is the function calling INPUT. 
Each function requiring input has been assigned a unique code and so 
INPUT is unambiguously aware of the calling function. Now suppose 
the user types "HELP". INPUT recognizes this and immediately calls 
the function COMMANDH ELP, passing to COMMANDH ELP the code for F. 
This code is given to COMMANDH ELP so that the appropriate INFO 
routine can be chosen for the question METAPHOR is asking the user. 
The codes are as given below: 
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FUNCTION CODE NAME CODE VALUE 


GETNUM PHASES 

GETS TATES 

GENERATEPMATRIX 

GGIVEN 

GNPAIL 

GDEDFAIL 

GENERATEHMATRIX 

GETNUMBAS IC VARIAB LES 

GETBASICVARIABLES 

GETNUMACCLEV 

GETIVECTOR 

GETGMATRICES 

GETFVECTOR 

GETWECTOR 

GETNUMTRAJSETS 

GETALTERVECTOR 

GETDATA VECTOR 

METAPHOR 


GNP 

1 

GS 

2 

GPM 

3 

GG 

4 

GN 

5 

GD 

6 

GHM 

7 

GNBV 

8 

GBV 

9 

GNA 

10 

GIV 

11 

GGM 

12 

GFV 

13 

GW 

14 

GNTS 

15 

GAV 

16 

GDV 

17 

MET 

18 


For example, suppose METAPHOR is executing the function 
GENERATEHMATRIX and so asks the user "WHAT TYPE OF H MATRIX?" The 
function GENERATEHMATRIX then requests the function INPUT with the 
call "8 INPUT indicating to INPUT that it is expecting an 

entry with 8 (character) values and that the function requesting the 
input is GENERATEHMATRIX., If the user has forgotten the legal types 
of H matrices, he can respond with "HELP," whereupon INPUT, by the 
method discussed in Section 3.1, will recognize the HELP request and 
will call the function COMMANDH ELP 7. By using the parameter 7, 
COMMANDH ELP, in turn, will call the function GHM INFO to print the 
desired aid. INPUT then places the string 'COMMAND* into IN; next 
GENERATEHMATRIX examines IN, determines a command was entered, again 

asks "WHAT TYPE OF H MATRIX?" ahd once more requests data through 
the INPUT function. 

Figure 2 shows a flowchart section of a typical data input 


3.2.1 HELP 




Figure 2. Typical flowchart section involving a call to the 

function INPUT 
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sequence. 

3.2.2 ALTER and DATA 

The structure of the ALTER and DATA commands are similar and 
will be discussed concurrently. When the user enters ’’ALTER", the 
function INPUT intercepts the command and calls the function 
COMM^^ALTER to handle the directive. In turn, COMMANDA LTER first 
calls the function GETALTER¥ECTOR to obtain from the user the 
variables to be changed. This information is used to form a vector 
(named ALTERVECTOR) which encodes those variables the user desires 
to change. Each index of ALTERVECTOR corresponds to an alterable 
variable and contains a 1 if the variables is to be changed and a 0 
if not. The index code is as follows: 


Index 1 Alter the P matrices. 

Index 2 — Alter the H matrices. 

Index 3 — Alter the time-invariant 

Index 4 — Alter the values of all 

Index 5 Alter the values 
accomplishment level. 


* 

basic variables, 
accomplishment levels, 
of just the present 


Index 6 Alter the initial vector. 

Index 7 — Alter the characteristic matrices. 

Index 8 Alter the characteristic vector. 

1 

basic variablL^^^ characterization of the time-invariant 
Index io Alter the number of trajectory sets. 


By "time-invariant" variables in this context we 
(sample) of a time invariant process. 


mean 


an element 
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When the user enters "DATA”, a similar sequence occurs, INPUT calls 
the function COMMANDD ATA, which in turn calls the function- 
GETDATAVECTOR. GETDATA VECTOR returns a variable called DATAVECTOR 
having the code below: 

Index 1 — Display the number of phases. 

Index 2 — Display the number of states in each phase. 

Index 3 — Display the P matrices. 

Index 4 — Display the H matrices. 

Index 5 Display the number of time-invariant basic 

variables. 

Index 6 — Display the probabilities of each of the time- 

invariant basic variables. 

Index 7 — Display the number of accomplishment levels. 

Index 8 Display the number of trajectory sets. 

Index 9 — Display the initial vector. 

Index 10 — Display the characteristic matr ices . 

Index 11 — Display the characteristic vector. 

Index 12 Display the characterization of the time- 

invariant basic variables. 

Index 13 — Display the performability . 

Both COMMANDA LTER and COMMANDD ATA then . loop through their 
control vectors (namely ALTERVECTOR or DATAVECTOR), altering or 
displaying the proper variables until all requests have been 
serviced. To insure that METAPHOR does not attempt to display or 
alter a value which has not been defined, a definition flag is 
associated with each alterable or displayable variable. The name of 
each such flag begins with "DEF", (See Section 2.2.) These are set 
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to 1 if the variable is defined and to 0 if the variable in question 
is undefined. Should the user request either the display of an 
undefined variable or the change of an undefined variable, an error 
message is printed and. the next .request is processed. The 
definition flags, along with the variables with which they are 
associated, are given in the following list; 

flag variable 

DEFACCLEVEL [Variables associated with 

accomplishment level 
definition] 


DEFBASICVARIABLES 

DEFP 

DEFG ■ 

DEFI 

DEFNUMACCLEV 

DE FNUMB AS I C VAR I AB LE S 

DEFNUM PHASES 

DEFNUMSTATES 

DEFTRAJSETS - 

DEFP 

DEFPERFORMAB ILITY 
DEFY 


BASICVARIAB LES 
F 
G 
I 

NUMACCLEV 

NUMB AS IC VAR lAB LES 

NUM PHASES 

NUMSTATES 

NUMTRAJSETS 

P 

PERFORMABILITY 

V . 


Alteration of variables is achieved by calling the proper 
functions associated with obtaining the variables. For instance, if 
the user desires to change the I vector, then the function 
GETrVECTOR is called. Presently,- alteration of the F vector is not 
possible (because after the F vector is input, it is immediately 
involved in calculations, see Section 4,2), however it is included 
in the ALTER routine for completeness. Display of variables is 
achieved by simply printing the variables. Before any alteration or 
display, a heading is printed stating-both that an alteration or 
display is to be executed and the variable that is involved. 
Figures 3-4 give the flowcharts of COMMANDA LTER and COMMANDD ATA. 

The functions GETALTERVECTOR and GETDATA VECTOR are fairly 
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Figure 3. Flowchart for the function COMMANDALTER 
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straightforward. They involve two of the few instances in METAPHOR 
where input is not handled by the INPUT function. A line is printed 
containing abbreviations of the variables which can be affected. 
The user must then place an X below each variable upon which he 
wishes to operate. The functions then check to see if the input was 
‘HELP* and if so, call COMMANDH ELP to print the information; 
otherwise, they check the positions of the X‘s in the input string 
to determine which variables the user is interested in. The result 
of the input is then returned as either ALTERVECTOR or DATAVECTOR. 
Flowcharts of these functions are given in Figures 5—6. 
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4- Algorithms Employed in EVAL 

Two important classes of algorithms are utilized in connection 
with the EVAL command to effect performability evaluation. The 
firs.t of these classes deals with the automatic and semi-automatic 
generation of H and P matrices for the models while the second class 
is concerned with the actual computation of the performability. 
Both categories are discussed beloWf the matrix generation 
algorithms in Section 4,1 and the computation algorithm in Section 
4.2. 

4.1 Matrix Generation 

Currently, -several matrix generation algorithms are implemented 
in METAPHOR, These are called DEDFAIL, NFAIL, and IDENTITY. The 
classes of matrices so generated have been found to be useful as 
commonplace classes of H and P matrices for degradable systems. 
{See the third Semi-Annual Status Report {3], Section 3. 5. 8,1, and 
the fourth Semi-Annual Status Report [4], Section 3.2.2.) the 
IDENTITY algorithm, which generates an identity matrix is 
straightforward and will not be discussed here. The NFAIL {Section 
4.1.1) and DEDFAIL (Section 4,1.2) algorithms compute transition 
matrices for special types of systems. Each assumes that the 
structure of the system is described In terms of "components" where 
the state of each component is either "operational" or "failed," 
Both DEDFAIL and NFAIL assume that all components are alike and fail 
independently with the same constant failure rate. Finally, 
components are assumed to fail permanently, i.e., once a component 
has failed, it remains failed for the duration of the phase. The 
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difference between the two resides in how the states of the system 
are defined in terms of component states. DEDPAIL keeps track of 
each component in the system, i.e., whether a given component is 
operational or failed can be deduced from the state of the system. 
In METAPHOR, the most important use of DEDFAIL is in modeling a 
system wherein each component (e.g., processor) is dedicated to a 
different task (hence the name DEDFAIL). in such situations, the 
processing capability generally depends on the state of each 
component and hence the system state must convey the state of each 
component. 

NFAIL, on the other hand, assumes that the components of the 
system are lumped into groups, NFAIL then keeps track only of the 
number of components which are operational within each of these 
groups. For instance, if two tasks and four processors are 
configured such that two processors are executing each task, then 
failure of either processor assigned to a given task will have the 
same effect on system performance. Accordingly, processors sharing 
the same task can be lumped, resulting in 2 groups with 2 processors 

per group. NFAIL is equivalent to DEDFAIL when NFAIL has n groups 
of 1 element each. 

4.1.1 DEDFAIL 

DEDFAIL generates a state transition matrix under the 
conditions stated above. If the system has N components, then the 
number of states declared for the phase must be a power of two. The 
resulting transition matrix is NxN where the (i,j)th entry denotes 
the probability that the system is in state j at the end of the 
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phase given it was in state i at the beginning of the phase. The i— 
th row • or column of the matrix represents the state determined as 
follows: Assign each component a unique integer between 1 and N. 
Take the binary representation of (2**N)-l-i. Then the i-th digit 
of the binary representation (read from left to right) represents 
the state of the corresponding component in the system, 0 if failed, 
1 if not failed. 

For example, consider a system with two components having the 
transition in Figure 7. With a failure rate of 0.001 and a phase 
length of 10, the following transition matrix results: 


( 1 / 1 ) ( 1 , 0 ) 


( 0 , 1 ) ( 0 , 0 ) 


(1/1) 

9.98E-1 

. 9.99E-4 

(1/0) 

O.OOEO 

9. 99E-1 

(1/0) 

0. OOEO 

O.OOEO 

(0,0) 

O.OOEO 

0. OOEO 


9.99E-4 9.99E-7 
O.OOEO l.OOE-3 
9.99E-1 l.OOE-3 
O.OOEO l.OOEO 


Here (1,1) means that both components are not failed, (1,0) that the 


first component is not failed but the second one is, (0,1) that the 


first component is failed but the second is not, and (0,0) that both 


components are failed. 


DEDFAIL is equivalent to NFAIL when NFAIL has. N groups of 1 
component each. 

DEDFAIL computes the transition matrix based on knowledge of 
the length of the phase, the failure rate of the components, and the 
number of states. This is accomplished by separately considering 
each entry (i,j) in the matrix. First, the number of transitions 
required for the entry is determined by taking the binary 
representation of the i-th row and j-th column as described above, 
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Figure 7. Transition diagram for the example of Section 4.1.1 
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subtracting j from i component by component, and counting the I's — 
if there is a 1 in j which does not appear in the corresponding 
position of i, then the transition is impossible and so the 
probability is 0. Finally, the probability of making the transition 
from state i to state j is calculated using standard combinatorial 
methods. A flowchart for DEDFAIL is given in Figure 8. In 
METAPHOR, DEDFAIL is implemented in GDBDFAIL. 
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Figure 8. 


Flowchart for the algorithm DEDFAIL 
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Figure 8 


© 




SIZE = number of I’s in row 
I that have corre- 
sponding 1 ' s in row J 

= number of success 
transitions 




FAIL = 

((Number of I’s in 
row I) - SIZE) 

= probability that the 
required number of 
failures for trans- 
ferring from state I 
to state J occur 


SUCCESS = (e'-^AMBDA *T^SIZE 

= probability that the 
required mnnber of 
successes for trans- 
ferring from state I 
to state J occur 


■i- 

© 


. Flowchart for the algorithm DEDFAIL, continued 
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m 


Z(I/J) = 


SUCCESS *FAIL, if -SIZE > the number of I's 
in row J, and if row I is not all zeros 
when ‘row j is not all zeroS' 

0 , otherwise 

SUCCESS *FAIL/ if all transitions are 
possible 

0 , otherwise 


probability of transferring to state J given 
that the system was initially in state I 


RETURN 


Figure 8. Flowchart for the algorithm DEDFAIL, continued 
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4.1.2 NFAIL 

NPAIL generates a state transition matrix assuming the 
conditions given in Section 4,1. The state of the system represents 
the number of active (non-failed) components in each group. The 
number of states declared for the phase is determined as 
follows: to the number of components in each group add 1 and take 

the product of the resulting terms. For example, consider a system 
having 3 groups containing respectively 5, 2, and 7 components. The 
phase then has (5+1 ) * (2+1 ) * (7+1 ) =144 states. In general, if the 
number of states for the phase is in N, then the resulting matrix 

will be NxN in shape, such that the (i,j)th entry will be the 

probability that the system is in state j at the end of the phase 
given it was in state i at the beginning of the phase. 

Consider a system having M groups and' suppose the number of 
components in the m-th group is denoted by the function K fm) . Then 
the i-th row or column of the resulting transition matrix represents 
the state determined as follows. First, take the mixed radix number 
system such that the j-th place (counted from the right) of a number 
has weight (multiplier) : 

1, if j=l 

(K(l)+1) (K(2)+l) ... (Kfj-1)+1), if j>l . 

The values ("digits") that the j-th place can take on are 0, 1, 

K(j). (The mechanism used to generate these radices is the APL 

ENCODE Cor REPRESENTATION or "T"] function. Thus, values for each 

place are returned as entries in a vector, and so the values are not 
limited to 0, 1, ..., 9.) For instance, with the 5,2,7 system above, 
we would employ a number system having 3 places. The first place 
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has weight 1 and can range form 0 to 7, the second place has weight 
7+1=8 and can vary from 0 to 2,‘. and the third place has weight 
(7+1) * (2+l)=24 and can range from 0 to 2. The base ten number 55 
would then be written ’207’ since 55 = 2*24 + 0*8 + 7*1, while the 
base ten number 17 would be expressed '021' because 17 = 0*24 + 2*8 
+ 1*1, A number represented in the above system has the following 
interpretation: the value of each digit of a number denotes the 
state of the corresponding group, i.e., the number of active (non- 
failed) components in the group. Hence ’021’ means groups 1, 2, and 
3 have 1, 2, and 0 active components respectively. For example, 
consider a system with 2 groups, the first having 1 component and 
the second 2 components, having the transition diagram in Figure 9. 
With a transition rate of 0.001 and a period of 10, the following 
transition matrix results: 




(2,1) 

(2,0) 

(1,1) 

(1,0) 

(0,1) 

o 

o 

(2, 

1) 

9.704E-1 

9.753E-3 

1. 951E-2 

1. 960E-4 

9. 802E-5 

9. 851E-7 

(2, 

0) 

0. OOOEO 

9.802E-1 

0. OOOEO 

1. 970E-2 

0. OOOEO 

9. 901E-5 

(1, 

1) 

0. OOOEO 

0. OOOEO 

9. 802E-1 

9. 851E-3 

9.851E-3 

9. 901E-5 

a. 

0) 

0, OOOEO 

0. OOOEO 

0. OOOEO 

9. 900E-1 

0. OOOEO 

9.950E-3 

(0, 

1) 

0. OOOEO 

0. OOOEO 

0. OOOEO 

0. OOOEO 

9.900E-1 

9, 950E-3 

(0, 

0) 

0. OOOEO 

0. OOOEO 

0. OOOEO 

0. OOOEO 

0. OOOEO 

1. OOOEO 

where 

(2,1) means 

that group 1 has one active 

components 

and group 2 

has 

one active 

component 

r (2,0) 

means that 

group 1 has no active 


components and group 2 two active components, and so forth. NFAIL 
is equivalent to DEDFAIL when N groups of one component each are 
specified . 

NFAIL computes the transition matrix based on knowledge of the 
length of the phase, the failure rate of the components, the number 
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of groups, and the number of components in each group. NFAIL 
computes the transition matrix by examining each entry in the 
matrix, determining the number of transitions required for the 
entry, and determining the probability of making those transitions. 
The. number of transition required is computed as follows: Take the 

representation of the (i,j)th entry as described above, subtract j 
from i component by component, and sum the differences— if there is 
a value in some position of j which is greater than the value of the 

corresponding position of i, then the transition is impossible and 
so the probability is 0. 

A flow chart for the algorithm NFAIL is given in Figure 10. in 
METAPHOR, NFAIL is implemented in GNFAIL. 
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NFAIL 


N. = number of states 
T = length of phase 
LAMBDA = component failure rate 
GROUPS = number of groups 

NUM = vector containing the number 
of components in each group 


NUM = MUM + 1 


Z = NxN matrix of zeros 


INDEX 


K(N) 

K(N-l) 

... K(l) 

K(N) 

K(N-l) 

... K(l)-1 

* 

♦ 

* 

• « * • 
• 

K(N)-1 

K(N-l) 

... K(l) 

K{N)-1 

K(N-l) 

... K(l}-1 

• 

• 

* 

• • • • 

0 

0 

... 1 

0 

0 

... 0 


N * N matrix such that each row is 
a state, where K(m) is the maximum 
number of components in group m 


Figure 10. Flowchart for the algorithm NFAIL 
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Figure 10, 


Flowchart for the algorithm NFAIL, continued 
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Figure 10. Flowchart for the algorithm NFAIL, 


continued 
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4.2 EVALUATION 

Another algorithm presently implemented in METAPHOR automates 
the computation of trajectory set probabilities, i.e., step 5) of 
the major steps outlined in the introduction. This algorithm is 
based on the theory described in this third Semi-Annual Status 
Report { [3], Section 3.4). A flowchart representation of the 
algorithm is given in Figure 11. 

The fetching of the number of phases, the number of states per 
phase, the intraphase (P) and interphase (H) matrices, the number of 
time-invariant basic variables, the probabilities of those time- 
invariant basic variables, and the' number of accomplishment levels 
is straightforward. Next METAPHOR computes the probability of each 
accomplishment level separately. First, the number of trajectory 
sets in the accomplishment level is obtained, and then the 
probability of each trajectory set is determined. This is done by 
procuring the initial state (I) vector, the characteristic (G) 
matrices, and the characteristic (F) vector (See Section 3.4 of [3]; 
also, a characterization of the time-invariant basic variables is 
obtained. This latter characterization is called the "V vector" in 
METAPHOR and is similar to the I vector. That is, each entry in V 
is associated with an entry in V (say V[kJ), and the probability 
that the event corresponding to that basic variable occurs during 
the mission is placed in V[k]. From these characterizations, the 
trajectory set probability is calculated according to 
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NUMPHASES = the number of phases in 
the finite phase model 


STATESPERPHASE = the number of states 

in each phase 


GET STATES 


P = the trans T t "i on rr»;^tT"i oet? 


for each phase 



GETPMATRICES 


H = the interphase tran- 
sition matrices 


GETHI4ATRICES 


NUMBAS ICVARIABLEE 

= the number of 


constant (i.e.. 


non-time varying) 


basic variables 


GETNUMBASIC 

VARIABLES 


Figure 11. Flowchart for the algorithm .EVALUATION 
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Figure 11. Flowchart for the algorithm EVALUATION, continued 
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LEVELPROB = 0 


Variable tallying 
the probability .of 
accomplishment level L 




NUMTRAJSETS = number of trajectory 
sets used to describe 


GETNUMTRA JSET S 


accomplishment level L 







T will denote the 
trajectory set 
under consideration 


GETIVECTOR 


GETGMATRICES 


\!/- 


F = characteristic vector 


GETFVECTOR 


M/ 



Figure 11. Flowchart for the algorithm EVALUATION, continued 
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m 


V = characterization of the 
constant basic variables 


GETWALUES 


TRAJPROB = I *P (1)- 


Initialize the variable 
containing. -the probability 
of trajectory set T. 
Performed in CALCTRAJPROB . 



PHASE = 2 


PHASE will denote the 
phase under consideration 




Figure 11. Flowchart for the algorithm EVALUATION, continued 
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Probability = I * P(l) * G fl) * H(l) * P (2) * G (2) * h/2) * 

* H fn) * F * V * BASICVARIABLES 

where n is the number of phases, and * denotes matrix 

multiplication. In METAPHOR, the algorithm that computes these 
probabilities according to the above formulas is implemented in the 
function CO MMANDE VAL and the various functions associated with 
COMMANDS VAL. 
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5. Description of METAPHOR Variables 

This section presents descriptions of each METAPHOR global 
variable as well as the more important local variables. The latter 
are primarily local variables utilized in more than one function. 
In addition to the descriptions, the functions making reference to 
each variables are listed in parenthesis after the variable name. 


ALTER CDECLAREMETAPHOR) Constant containing the string 
'ALTER ’. Used for inputting the ALTER command. 

BASIC VAR TABLES fCALCTRAJPROB , GETBASICVARIABLES , DATA) Vector 
of length 2*NUMBASICVARIABLES . The first half of 
BASICVARIABLES contains the probability of the 
corresponding time-invariant basic variable, while the 
second half contains one minus the corresponding entries ir 
the first half of BASICVARIABLES. 

BRIEF (DECLAREMETAPHOR) Constant containing the string 
'BRIEF '. Used for inputting the BRIEF command. 

BRIEFOUTPUT^JDECLAREMETAPHOR, PRINT, PRINTQUAD, COMMANDBRIEF) 

scalar flag set to 1 if terse output desired, set to 0 if 
not. 

CALC (DECLAREMETAPHOR) Constant containing the string 'CALC 
Used for inputting the CALC command. 

CHECKNO (CHECKBIN, CHECKPOSI, CHECKPROB, CHECKTRI) Local 
variable containing the value to be checked. 

COM (DECLAREMETAPHOR) Constant containing the string 'CALC 
Used for inputting the CALC command. 

COMMANDLIST (DECLAREMETAPHOR, INPUT) Array list of valid 

commands. Used to determine whether an input is a command, 
and if so, which command. 


COMMANDS IZE (DECLAREMETAPHOR) scalar constant denoting the 
maximum length of the valid commands. 


5 . 
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DATA (DECLAREMETAPHOR ) Constant containing the string 'DATA * 
Used for inputting the DATA command. 

DEDPAIL (DECLAREMETAPHOR) Constant vector containing the string 
DEDFAIL *. Used for inputting the DEDFAIL matrix 
generator instruction. 

DEFACCLpEL (DECLAREMETAPHOR, GETPERPORMABILITY, COMMANDALTER ) 
Definition flag denoting whether the accomplishment levels 
have been defined. The value is 1 if so, 0 otherwise. 

DEFBASIC VAR TABLES (DECLAREMETAPHOR, GE TEAS IC VARIABLES 

COMMANDA LTER, COMMANDD ATA) Definition flag denoting whether 
the time-invariant basic variables have been defined. The 
value is 1 if so, 0 otherwise. 

DEFF_jDECLAREMETAPHOR, GETACCLEVPROB , COMMANDALTER, 

COMMANDD ATA) Definition flag denoting whether the final 
vector has been defined. The value is 1 if so, 0 
otherwise . 


DEFG (DECLAREMETAPHOR, GENERATEHMATRIX4 , COMMANDALTER 
COMMANDD ATA ) Definition flag deno ting“whether the" 
characterisitc matrices have been defined. The value is 1 
if so, 0 otherwise. 


DEPH^JDEC^REMETAPHOR, COMMAND ALTER , COMMANDDATA) Definition 
flag denoting whether the interphase transition matrices 
have been defined. The value is 1 if so, 0 otherwise. 


DEFI (DECLAREMETAPHOR, GETACCLEVPROB, COMMANDALTER, 

COMMANDDATA ) Definition flag denoting whether the initial 
vector has been defined. The value is 1 if so, 0 
otherwise. 


GETNUMACCLEV, COMMANDA LTER, 

— M MANDD ATA ) Definition flag denoting whether the number of 
accomplishment levels has been defined. The value is 1 if 
so, 0 otherwise. 


• ^?®?^^^”ETAPHOR, GETNUMBASICVARIABLES , 
COMMANDD ATA ) Definition flag denoting whether the number of 
basic variables has been defined. The value is 1 if so, 0 
otherwise. ^ , 

DEFNUMPHASES (DECLAREMETAPHOR, GETNUMPHASES , COMMANDDATA) 

efinition flag denoting whether the number" of phases has 
been defined. The value is 1 if so, 0 otherwise. 
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DEFNUMS.TATES (DEC LAR EM ETA PH OR, GETSTATES, COMMANDDATA) 

Definition flag denoting whether the number of states has 
been defined. The value is 1 if so, 0 otherwise. 

DEFNUMTRAJSETS fDECLAREMETAPHOR, GETACCLEVPROB , GETNUMTRAJSETS 
COMMANDALTER, COMMANDD ATA) Definition flag denoting whethe^ 
the number of trajectory sets has been defined. The value 
IS 1 If so, 0 otherwise. 

DEPP (DECLAREMETAPHOR, GETPMATRICES , COMMANDA LTER, COMMANDDATA) 
Definition flag denoting whether the intraphase transition 
matrices have been defined. The value is 1 if so 0 
otherwise. ' 


DEFPERFORMABILITY {DEC LAREMETAPHOR , GETPERFORMAB ILITY 

COMMANDDATA) value of the performabil ity of the system 
been defined. The value is 1 if so, 0 otherwise. 


have 


DEFY fDECLAREMETAPHOR, GETACCLEVPROB, COMMANDALTER, 

COMMANDDATA) Definition flag denoting whether the vector 
characterizing the time-invariant basic variables have been 
defined. The value is 1 if so, 0 otherwise. 


ECHOINPUT 
flag 
not . 


fDECLAREMETAPHOR, INPUT, IN YES, COMMANDE CHO) A scalar 
set to 1 if .the echoing of input desired, set to 0 if 


- (CALCTRAJPROB, DATA, GETACCLEVPROB) Vector local to the 
function GETACCLEVPROB containing the characteristic (F) 
vector. Its shape is NUMSTATES [NUMPHASES ] . 

Constant vector containing the string 
GIVEN . Used for inputting the GIVEN matrix 
instruction. 


H 


fCALCTRAJPROB, GETHMATRICES , DATA) 
interphase (H) matrices. Its shape 
1 ) X (MAXNUMSTATES ) x (MAXNUMSTATES ) . 


Array containing 
is (NUMPHASES- 


the 


G fCALCTRAJPROB, DATA, GETACCLEVPROB) Array local to the 
function GETACCLEVPROB containing the characteristic (G ) 
matrices. Its shape is (MAXNUMSTATES ) x (MAXNUMSTATES ) . 

HELP fDECLAREMETAPHOR) Constant containing the string ’HELP ’ 
Used for inputting the HELP command. 


I 


fCALCTRAJPROB, DATA, GETACCLEVPROB) 
function GETACCLEVPROB containing 
Its shape is NUMSTATES [1] . 


Vector local to the 
the initial (I) vector. 
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IDENTITY fDECLAREMETAPHOR, GENERATEHMATRIX, GENERATE PMATRIX) 

constant vector containing the string 'IDENTITY '7 Used for 
inputting the identity matrix generator instruction. 

IN (GENERATE HMATR IX, GENERATE£MATRIX, GETALTERVECTOR, 

GETBASICVARIABLES, GETNUMACCLEV, GETNUMBASICVARIABLES , 
GETNUMPHASES, GETNUMTRA JSETS , GETSTATES, GETFVECTOR, 
GETGMATRICES, GETHMATRICES , GETTVECTOR, GETPMATRICES , 
GETWALUES, INPUT, GDEDFAIL, GGIVEN, GNFAILT vector 
containing the latest data input to METAPHOR. 

MAXNUMSTATES (GETSTATES, GETGMATRICES, GETHMATRICES 

GETIVECTOR, GETPMATRICES) scalar denoting the maximum 
number of states in any phase of the finite phase model. 

NFAIL (DECLAREMETAPHOR) Constant vector containing the string 
|NFAIL Used for inputting the NFAIL matrix generator 

instruction. 


NUMACCLEV (GETNUMACCLEV, GETPERFORMABILITY) Scalar denoting the 
number of accomplishment levels in the model. 

NUMBASICVARIABLES (GETNUMACCLEV, GETPERFORMABILITY) Scalar 
denoting the number of time-invariant basic variables in 
the model. 

NUMPHASES_ (GETNUMPHASES, GETHMATRICES, GETPMATRICES) Scalar 
denoting the number of phases in the model. 

NUMSTATES (GETSTATES) Vector denoting the number of states in 
each phase of the model. 


NUMTRAJSETS (GETACCLEVPROB , GETPERFORMABILITY) Scalar denoting 
the number of trajectory in the accomplishment level 
currently under consideration. 


OFF (DECLAREMETAPHOR) Constant containing the string 'OFF 
Used for inputting the ON command parameter. 


ON (DECLAREMETAPHOR) Constant containing the string 'ON 
Used for inputting the ON command parameter. 


P 


(CALCTRAJPROB, GETPMATRICES, DATA) Array containing 
intraphase (P) matrices. its shape is 
(NUMPHASES )x (MAXNUMSTATES) x (MAXNUMSTATES ) . 


the 


PERFORMABILITY (GETPERFORMABILITY, PRINTPERFORMABILITY) Scalai. 
containing the calculated value of the performability for 
the model. ^ 
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Q (PRINT, PRINTQUAD) Local variable containing the text to be 
printed. 

ROUTINE (INPUT) Local variable containing the code of the 
routine calling INPUT. 

SHAPE (INPUT) Local variable containing the expected dimension 
of the input. 

STATESPERPHASE (GETSTATES, GETFVECTOR, GETGMATRICES , 

GETHMATRICES, GETI^VECTOR, GETPMATRICES ) Vector containing 
the number of states in each phase. 

SWITCH (BRIEF, ECHO) Local variable containing the command 'ON’ 
or ’OFF'. 


V (CALCTRA JPROB , DATA, GETACCLEVPROB ) Vector local to the 

function GETACCLEVPROB containing the vector characterizing 
the time-invariant basic variables in the model. ’{See 
Section 4.2.). its shape is NUMBASICVARIABLES . 


Z (BRIEF, CALCTRAJPROB , CHECKBIN, CHECKPOSI, CHECKTRI, ECHO 
ENCODE, GENERATEHMATRIX, GENERATEPMATRIX, GETACCLEVPROB ! 
GETBASICVARIABLES, GETDATAVECTOR , GETNUMTRAJSETS 
GETFVECTOR, GETGMATRICES, GETIVECTOR, GETWALUES, INYES 
PRINT, PRINTQUAD, GDEDFAIL, ^GIVEM, GIDENTITY, GNFAIL) 

Local variable which will be passed the result of the 
function. 


(DECLAREMpAPHOR, GETALTERVECTOR ) Constant used to identify 
the function GETALTERVECTOR. Contains the value 16. Used 
by COMMANDH ELP. 

(DECLAREMETAPHOR, GETBASICVARIABLES) Constant used to 
Identify the function GETBASICVARIABLES. Contains the 
value 9. Used by COMMANDH ELP. 

GD (DECLAREMETAPHOR, GDEDFAIL) Constant used to identify the 
function GDEDFAIL. Contains the value 6. Used by 
COMMANDHELP. ^ 


gPy (DECLAREMETAPHOR, GETDATAVECTOR) Constant 
the function GETDATAVECTOR. Contains the 
by COMMANDHELP. 


used to identify 
value 17. Used 


GFV (DECLAREMETAPHOR, GETFVECTOR) Constant used 
function GETFVECTOR. Contains the value 13 
COMMANDHELP. 


to identify 
Used by 


the 
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GGM (DECLAREMETAPHOR, GETGMATRICES ) Constant used to identify 
the function GETGMATRICES, Contains the value 12, Used by 
COMMANDH ELP, 

GG (DECLAREMETAPHOR, GGIVEN) Constant used to identify the 
function GGIVEN. Contains the value 4. Used by 
COMMANDH ELP . 

GHM (DECLAREMETAPHOR, GENERATEHMATRIX) Constant used to 

identify the function GETHMATRICES. Contains the value 7.- 
Used by COMMANDH ELP. 

GIV (DECLAREMETAPHOR, GETIVECTOR) Constant used to identify the 
function GETIVECTOR- Contains the value 11, Used by 
COMMANDH ELP, 

GM (DECLAREMETAPHOR, GETACCLEVPROB) Constant used to identify 
the function GMFAIL. Contains the value 5, Used by 
COMMANDH ELP. 

GNA (DECLAREMETAPHOR, GETNUMACCLEV) Constant used to identify 
the function GETNUMACCLEV. Contains the value 10. Used by 
COMMANDH ELP. 

GNBV (DECLAREMETAPHOR, GETNUMBASICVARIABLES ) Constant used to 
identify the function GETNUMBASICVARIABLES. Contains the 
value 8. Used by COMMANDH ELP. 

GNP (DECLAREMETAPHOR, GETMUHPHASES) Constant used to identify 
the function GETNUMPHASSS. Contains the va lue 1. Used by 
COMMANDH ELP. 

GNTS (DECLAREMETAPHOR, GETNUMTRAJSETS ) Constant used to 

identify the function GETNUMTRAJSETS. Contains the value 
15. Used by COMMANDH ELP. 

GPM (DECLAREMETAPHOR, GENERATEPMATRIX) Constant used to 

identify the function GETPMATRICES, Contains the value 3, 
Used by COMMANDH ELP. 

GS (DECLAREMETAPHOR, GETSTATES) Constant used to identify the 
function GETSTATES. Contains the value 2, Used by 
COMMANDH ELP. 

GW (DECLAREMETAPHOR, GETWALUES) Constant used to identify the 
function GETWECTOR, Contains the value 14. Used by 
COMMANDHELP. 
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HMATRIXLIST fDECLAREMETAPHOR, GENERATEH^MATRIX) Array list of 
valid H matrix types. Used to determine whether an input 
is an H matrix type, and if so, which type. 

(DECLAREMETAPHOR, METAPHOR) Constant used to identify the 
function METAPHOR. Contains the value 18. Used by 
COMMANDH ELP. 

PMATRIXLIST (DECLAREMETAPHOR, GENERATEPMATRIX) Array list of 
valid P matrix types. Used to determine whether an input' 
is an P matrix type, and if so, which type. 


5. Description of METAPHOR Variables 
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6. Interdependence of METAPHOR Functions 

This section discusses the interdependence of METAPHOR 
functions expressed as a hierarchy denoting which functions call 
which other functions. Specifically, the graph of Figure 12 is used 
to portray these relationships. 

Each function F in METAPHOR is included at least once in the 
graph; every function that is called by F is connected below F in 
the graph, while one function that calls F is connected above. If F 
does not call other functions, then no functions are listed below F, 
while if no functions call F (as is the case with METAPHOR, BRIEF, 
and ECHO), then no function is listed above F. Occasionally, either 
insufficient room is available on the page to place a segment of the 
graph, or else a segment has already been positioned somewhere else. 
In this case, a' number (or a number and a letter) is placed below 
the function to indicate a continuation on some other page of the 
diagram. The number refers to the page of the diagram with the 
continuation. The number (or number and letter) is placed somewhere 
on the continuation either with an equal sign (=) next to the 
function name for which it denotes a continuation or else with a 
list of functions below it. For example, if at some location the 
following entry occurs 
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FUNCTION 1 
! “ 

I 

7b 


then on the seventh page of the diagram, one would find one of 
situations below: 


7b=PUNCTI0N 1 

I “ 

I 


FUNCTION 2 


FUNCTION 3 


7b 


FUNCTION 2 


FUNCTION 3 


the 
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Interdependence of METAPHOR Functions 



METAPHOR (Version 1) Prograitiiner ' s Guide 


hg 

H- 

iQ 

C 

o 

to 


H 

3 

ft 

(D 

i-l 

a 

fD 

n> 

3 

Qj 

(B 

3 

o 

(D 

O 

Hi 

s 

w 


►3 

w 

o 

w 

Hi 

c 

3 

O 

rt 

o 

3 

in 


METAPHOR 

I 

DECLAREMETAPHOR PRINT la = INPUT 

1 I \ I ^ 

PRINTQUAD PRINT COMMAND H ELP COMMANDD ATA COMMANDALTER 

2 

I L|_ 

GETDATAVECTOR PRINT 

T 

I 

J , I ^ ^ 

COMMAND C ALC COMMAND EC HO COMMANDCOM COMMAND BRIEF COMMANDEVAL 


3 


PRINTQUAD 


ui 

a\ 


4 



of METAPHOR Functions 


2 = COMMANDHELP 


H- 

iQ 

C 

(D 

hJ 


H 

P 

rt- 

(D 

i-« 

a 

fD 

0) 

a 

Qj 

n> 

3 

O 

ro 


CTl 


H 

3 

rt" 

fD 

If 

Qi 

to 

fD 

3 

Oi 

fD 

3 

O 

(D 


O 

Hi 

s 

w 


h3 

K 

O 

w 

Hi 

C 

3 

O 

rt 

H- 

O 

3 

CD 


O' 

O 

3 

ft 

H* 

3 

C 

fD 

a 





PRINT 



3 = COMMANDALTER 


s 


w 


^3 


> 


nj 


a 


o 

H- 

w 

iQ 


C 


M 

< 

(D 

fD 



M 

W 

N> 

H- 

• 

o 


a 

H 

M 

o 

*-w< 

f+ 


(0 



1-1 

Di 

o 

(I> 

iQ 

*T3 

i-< 

fD 


C3 

§ 

a 


fD 

n> 

3 

i-( 

O 

-> 

(D 

Oi 

O 

a 

H) 

c 


H- 

s 

o> 

ra 

ro 



> 




m 


o 


w 


t-tj 


c 


3 


o 


ft 


H* 


o 


3 


W 




o 


o 


3 


ft 


P- 


3 


C 


fD 


a 





Ln 

00 



H- 

iQ 

C 

i-< 

(0 


N3 


<n 


M 

3 

rT 

(B 

Du 

D 

►O 

m 

3 

Oi 

ro 

3 

o 

o 

o 

Hi 


H3 

® 

O 

W 

c 

D 

n 

f+ 

o 

3 

[fl 


H 

3 

rt- 

W 

H 


Cb 

ro 

*d 


ro 

3 

Qj 

(0 

3 

o 

fD 

o 

Hi 


s 

w 

1:3 

> 

>3 

a 

o 

w 


Hi 

c 

3 

n 

f+ 

H- 

o 

3 

cn 


o 

O 

3 

ft 

H- 

3 

3 

(B 

Qi 




4 = COMMANDEVAL 







i 

GETNUMPHASES 

1 

1 

GETSTATES 

1 

4b 

1 

= GETPMATRICES 

~l 


1 

4a 

1 

4a 

1 1 

PRINT PRINTQUAD GENERATEPMATRIX 

r 

5 



1 


4c = GETHMATRICES >' GETNUMBASICVARIABLES 

^ i ' i 


PRINT PRINTQUAD GENERATEHMATRIX 


PRINT INPUT GGIVEN GIDENTITY 


5a 


r 

I 

I 

I 


4d = GETBASICVARIABLES GETNUf^ACCLEV GETPERP PUTPERFORMABILITY 


I 

PRINT 

INPUT 

f 

CHECKPROB 

1 

PRINT 

4a 

GETACCLEVPROB 

. 1 
6 • 

PRINT 





4a 

1 



U1 

VD 



1 ^ 
PRINT 

r 

INPUT 

I 

CHECKPOSI 




la 


PRINT 



METAPHOR (Version 1) Programmer's Guide 


H* 

to 

c; 

t-s 

(D 

K) 


H 

3 

rt 

fO 

a 

fD 

►o 

o 

3 

a 

(i> 

3 

O 

(a 

o 

Hi 


> 

•3 

W 

o 

w 

Hi 

c 

3 

O 

ft 

H* 

o 

3 

Cfl 


O 

O 

3 

rt 

H- 

3 

C 

fl) 

Qi 


5 = GENERATEPMATRIX 



1 

PRINT 

1 

INPUT 

1 

^ 

5a = GGIVEN 

^ ”1 

1 

I 

1 

1 


la 

1 r 1 

PRINT ■ INPUT CHECKPROB 

1 

1 

1 

1 

1 



1 

PRINT 

1 

1 

1 

1 

1 

1 

1. 


1 

GDEDPAIL 

II 

1 

1 

1 

1 

1 

1 

PRINT 

1 

INPUT 

1 1 
PRINTQUAD ENCODE 

1 

1 

1 

J 

1 

1 

j 



1 

GNFAIL 

1 

1 

GIDENTITY 

1 

PRINT 

1 

INPUT 

r 1 1 

PRINTQUAD CHECKPOST ENCODE 



o> 

o 



6 = GETACCLEVPROB 


txj 

H- 

ua 

c 

i-s 

CD 

h-> 

M 


CTi 


H 

3 
rf 
fD 
*-< 

04 

(D 

V 

(D 

3 

a 

ro 

3 

O 

CD 

o 

t-h 

5 

ta 

1-3 

> 

£3 

O 

c 

3 

O 

rt- 

H- 

O 

3 

tfl 


H 

3 


ri- 

CD 

11 

a 

CD 


>3 

CD 

3 

a 

(D 

3 

o 

CD 


o 

Ml 

s 

t?d 

►3 

a 

o 

a 


Ml 

c 

3 

o 

ft 

M- 

o 

3 

to 


o 

o 

3 

r+ 

3 

C 

(D 

a 


6e = GETNUMTRAJSETS PRINTpUAD PRINT 


PRINT 


PRINTQUAD 

^ 

INPUT 

i 

CHECKPOSI 




1 

1 

1 


6a 

1 

= GET I VECTOR 


6b = 

1 1 

GETGMATRICES 1 








1 

1 

I 

PRINT 


[-J 

INPUT 

1 

1 

CHECKBIN 


1 

PRINT 

r — 

INPUT 

1 

1 ■ ! 
CHECKBIN 1 
1 1 



i 

la 

PRINT 



1 

la 

1 ! 
PRINT j 

i 

1 

1 . — 

1 

1 


6c 

( 

== GETFVECTOR 

r 


1 

6ca = GETWALUES 

r 

1 

1 

I 

I 

1 

I 

PRINT 


1 

INPUT 

1 

1 

CHECKBIN 

j 

r 

PEIHTQOAD 

1 

PRINT 

1 

INPUT 

1 

1 1 

CHECKTRI 1 
1 1 



f 

la 

PRINT 



1 

la 

1 1 
PRINT j 

1 


i 

t 


CALCTRAJPROB 



62 


7. METAPHOR Function Descriptions 

This section gives an overview of each METAPHOR function, 
giving its calling sequence, purpose, global variables used, 
functions calling it, functions it calls, general comments, and 
listing. 
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BRIEF 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result BRIEF arg 


PURPOSE: To allow the input of the BRIEF user 

command . 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: None. 


FUNCTIONS CALLED: None. 


COMMENTS: Called when the user types 'BRIEF arg' in 

response to a (non-yes/no) question"^ The 
valid arguments are 'ON' and 'OFF.' BRIEF 
ON suppresses most of the output from 
METAPHOR, while BRIEF OFF allows the 
normal full output. The default is BRIEF 
OFF, BRIEF returns a twelve character 
representation of the BRIEF command (for 
INPUT) and the value of arg in result. 
For example, after the command BRIEF ON, 
the vector 'BRIEF ON ' is returned in 
result. 


LISTING: 

7 Z^BRIEF SWITCH 

[1 1 n 

C2] n ROUTINE TO IRPUT THE BRIEF COMMAND 
C3] fl 

C43 n RETURN THE VALUE 
[5J BRIEF ^ , SWITCH 

7 
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CALCTRAJPROB 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; result CALCTRAJPROB 


PURPOSE: To calculate the probability of a given 

trajectory set. 


GLOBAL VARIABLES; BASICVARIABLES , H, NUMBASIC VARIABLES, P, 


CALLING FUNCTIONS: GETACCLEVPROB . 


FUNCTIONS CALLED: None. 


COMMENTS; Uses the values of F, G, I, and V found in 
GETFVECTOR, GETG^MATRICES , GETTVECTOR, and 
GETVVALUES as well as the global variables 
to calculate the probability of a 
trajectory set. The formula used to 
perform the calculations is: 


Probability = i * p(i) * g( 1) * H(l) * P(2) * G (2) * H(2) * 

... * H(n) * F * V * BASICVARIABLES 

where there are n phases, and * denotes 
matrix multiplication. The probability is 
returned in result. 


LISTING: 

V Z-^CALCTRAJPROBiJiPHASE 

Cl] n 

C2] n CALCULATES THE PROBABILITY OF THE GIVEN TRAJECTORY 
C 3 ] fl 

C4] R COMPUTE THE INITIAL PHASE PROBABILITY 
C5] Z-«-J+.xpi:i 
C 6 ] fl 

[7] fi LOOP THROUGH THE OTHER PHASES 
C8] fl INITIALIZE PHASE COUNTER 
C9] PHASE^l 

ClO] fl FIRST CONSIDER THE SUCCESS STATES MATRIX 
Cll] CTP LOOP: Z-^Zy-GlPHASE-l:! 

Cl2] fl THEN THE INTERPHASE MATRIX 

[13] Z-^-Z+.^HlPHASE-liO 

[14] fi THEN THE TRANSITION MATRIX 

[15] Z^Z+.^PlPHASEiil 
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C 1 6 ] R 

Cl7] R INCREMEllT PHASE COUNTER AND BRANCH IF APPROPRIATE 

[18] PH A SE-^PHASE + 1 

[19] ■^iPHASE^NUMPHASES) /CTPLOOF 

[20] fl 

[21] ft POST-MULTIPLY BY FINAL STATE 

[ 22 ] Z-^Z+,^F 

[23] ft FIN ALLY , MULTIPLY BY THE TIME+ INV ARIANT BASIC VARIABLE 
PROBABILITIES 

p4] ft IF NO TIME+INV ARIANT BASIC VARIABLES ^ EXIT 

[25] ■*{NUMBASICVARIABLES=0)/Q 

[26] Z-^Zy<.+ /Vy-BASICVARIABLES 
7 


1 . 
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CHECKBIN 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result CHECKBIN arg 


PURPOSE: To check that arg has only binary (0, 1) 

values. 


GLOBAL VAR-IABLES: ‘None. 


CALLING FUNCTIONS: GETFVECTOR, GETGMATRICES / GETIVECTOR. 


FUNCTIONS CALLED: PRINT. 


COMMENTS: Checks the input argument arg for O's and 

I's. The argument can be either a scalar 
or a vector. If each entry is binary, 
CHECKBIN returns a 0, else a warning is 
printed and a 1 is returned in result. 


LISTING: 

7 Z-^CBECKBIN CHECKNO 

111 fl 

C2: fl BETURN 0 IF CHECKNO CONTAINS ONLY BINARY ZEROS. AND ONES 

C33 a- ELSE PRINT MESSAGE AND RETURN 1 

C41 fl 

C 5 ] fl CHECK FOR PROPER BINARY ELEMENTS 

C6l Z-^~{h/CHECKNOe. 0 1) 

C71 -»-(~Z)/0 

C8] PRINT 'EACH ENTRY MUST BE EITHER Q OR 1' 

C 9 ] ->-0 

V 
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CHECKPOSI 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; result CHECKPOSI arg 


PURPOSE: To check that a rg has only positive 

integer values. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: ' GETNUMACCLEV, GETNUMBASICVARIABLES , 

GETNUMPHASES, GETNUMTRAJSETS , GETSTATES. 


FUNCTIONS CALLED: PRINT. 


COMMENTS: Checks the input argument arg for positive 

integers. The argument can be either a 
scalar or a vector. If each entry is a 
positive integer, CHECKPOSI returns a 0, 
else a warning is printed and a 1 is 
returned in result. 


LISTING: 

V Z-^CEECKPOSI CHECKNO 

Cl] fl 

[2] n RETURN 0 IF CHECKNO IS A POSITIVE INTEGER, ELSE PRINT 
MESSAGE AND RETURN 1 
C3] fl 

C4] fi CHECK FOR POSITIVENESS 

[5] Z^-^^/{CHECKN0>0) 

[6] ■*i.~Z) / CHECKI NT 

C'7] PRINT 'INPUT NOT POSITIVE' 

[ 8 ] ^0 
[9] a 

CIO] a CHECK FOR INTEGER 

Cll] CHECKINT:Z^'-'A/CHECKNO=[CHECKNO 

Cl2] -^(~Z)/0 

Cl3] PRINT 'INPUT NOT AN INTEGER' 

V 
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CHECKPROB 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result <- CHECKPROB arg 


PURPOSE: To check that arg has only valid 

probability (between 0 and 1) values. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: GETB AS IC VARIABLES , GGIVEN. 


FUNCTIONS CALLED: PRINT. 


COMMENTS: Checks the input argument arg for numbers 

between 0 and 1 inclusive. The argument 
can be either a scalar or a vector. If 
each entry is a valid probability, 
CHECKPROB returns a 0, else a warning is 
printed and a 1 is returned in result. 


LISTING: 

V Z^CSECKPEOB CHECKNO 
Cl] n 

C2] R RETURN 0 IE CHECKNO IS- BETWEEN 0 ANT) 1 INCLUSIVE , ELSE 
PRINT MESSAGE AND RETURN 1 
C3] n 

C4] fl CHECK FOR PROPER RANGE 
C 5 ] Z-e-~( ^/CHECKNO^O ) a ( a / CH EC KN0< 1 ) 

[ 6 ] ^(~ Z )/0 

C7] PRINT * INPUT NOT BETWEEN 0 AND 1’ 

7 
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CHECKTRI 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; result <- CHECKTRI arg 


PURPOSE: To check that arg has only trinary (0, 1, 

2) values. 


GLOBAL VARIABLES; None. 


CALLING FUNCTIONS: GETWALUES. 

FUNCTIONS CALLED; PRINT. 


COMMENTS : 


Checks the input argumen 
I's, and 2's. The argument 
scalar or a vector. If 
binary, ‘ CHECKTRI returns 
warning is printed and a 1 
result. 


t arg for 0 ' s , 
can be either a 
each entry is 
a 0, else a 
is returned in 


LISTING; 

V Z^CHECKTRI CHECKNO 

Cl] n 

[2] fi RETURN 0 IF CUECKNO CONTAINS ONLY TRINARY ZEROS ^ ONES, AND 
TWOS 

C3] R ELSE FEINT MESSAGE AND RETURN 1 
C4-3 fl 

[5] fi CHECK FOR PROPER TRINARY ELEMENTS 

C6] Z^'-{.^/CnECKNQ€ 0 12) 

[7] ->(~Z)/0 

[8] PRINT 'EACH ENTRY MUST BE EITHER 0,1, OR 2' 

[ 9 ] ^0 

V 
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CALLING SEQUENCE: 
PURPOSE : 

GLOBAL VARIABLES: 


FUNCTIONS CALLED: 
COMMENTS: 


DEC LAREMETAPHOR 
METAPHOR FUNCTION DESCRIPTION 
DECLAREMETAPHOR 


To initialize the global variables and 
constants employed in the METAPHOR 
package. 


ALTER, BRIEFOUTPUT, CALC, COM, 
COMMANDLIST, COMMANDSIZE, DATA, DEDFAIL, 
DEFACCLEVEL, DEFBAS ICVARIABLES , DEFF, 
DEFG, DEFH, DEFI, DEFNUMACCLEV, 
DEFNUMBASICVARIABLES, DEFNUMPHASES , 
DEFNUMSTATES, DEFNUMTRAJSETS , DEFP, 
DEFPERFORMABILITY, DEFV, ECHOINPUT, EVAL, 
EXIT, GIVEN, HELP, IDENTITY, NFAIL, OFF, 
ON, GAV, GBV, GD, GDV, GFV, GGM, GG, GHM, 
GIV, GN, GNA, GNBV, GNP , GNTS, GPM, GS , 
GW , HMATRIXDUMMYLIST, HMATRIXLIST, MET, 
PMATRIXLIST. 


None. 


Initializes the control constants used by 
METAPHOR to determine its own state. These 
consist of the following: 

1. A series of variables containing the 
command words METAPHOR recognizes. The 
variables are ALTER, CALC, COM, DATA, 
EVAL, EXIT, and HELP, Also declared are 
two switch settings, ON and OFF. 

2. A matrix used to ' determine which 
command has been input. It can recognize 
the commands above, as well as ECHO and 
BRIEF. The matrix is COMMANDLIST , In 
addition, the size of the commands is set 
in COMMANDSIZE. 

3. A series of variables containing the 
types of matrices METAPHOR will generate. 
Specifically, these are DEDFAIL, GIVEN, 
IDENTITY, and NFAIL. 

4. Two matrices used to determine which 
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matrix type has been specified. These 
matrices are PiMATRIXLIST and PMATRIXLIST. 

5. A series of variables used by METAPHOR 
to specify the function it is presently 
executing. These are used to select the 
proper HELP routine to print in response 
to a^ HELP request. These are all 
underlined and generally begin with a G. 
For example / GAV and GBV. Note, however, 
that MET is also such an indicator. 

6. The number of HELP routines.. This is 
placed in NUMHELPROUTINES . 

7. A series of variables used as flags to 
determine if a given value has been 
defined. These are initially set to 'not 
defined.* these are used in conjunction 
with the ALTER and DATA commands to 
determine if a given value can be changed 
or displayed. All of these flags begin 
with *DEF,' for instance, DEFACCLEVEL and 
DE FB AS I C VAR I A B LE S . 

8. Two switches used to control output 
and input echoing. These are initialized 
to off, thus allowing normal output and no 
input echoing. These switches are 
BRIEFOLITPUT and ECHOINPUT. 


LISTING: 

V DECLAREMETAPHOR 

Cl] fl 

[2] fl DECLARES AND INITIALIZES THE ■ CONSTANTS USED IN TEE 'PERF' 
FUNCTION SERIES 
C 3 ] fl 

C4] n SET THE LIST OF COMMANDS 

[5] HELP^'HELP ’ 

[ 6 ] EXIT ^ * EXIT ’ 

[7] DATA^'DATA ' 

[8] ALTERS' ALTER * 

[9] CALC<-'CALC » 

CIO] COM-^'COM ' 

[11] EVAL^^EVAL * 

[12] ON^'ON * 

[13] OFF <- ' OFF ' 

[14] COMMANDSIZE-t-& 

[15] COMMANDLIST-<r(2,COMMANDSIZE) p^HELP ^,'EXIT ','DATA ' 'ALTER 
' ,'CALC ' ,'ECHO 'BRIEF ','COM ''EVAL ' 

Cl6 ] ft 

[17] ft 


7. DECLAREMETAPHOR METAPHOR FUNCTION DESCRIPTION 



72 


H18 3 n SET LIST OF MATRIX GENERATOR TYPES 
[19 D GIVEN->-' GIVEN ♦ 

[20 3 DEDFAIL^^ DEDFAIL ’ 

[213 NFAIL-^^NFAIL ' 

[223 ID ENTITY-*- * IV ENTITY ’ 

[233 PMATRIXLIST-^{^: Q)p'GIVEN ^,'VEVFAIL '^'NFAIL 
’ , 'IDENTITY^ 

[243 ^MATRIX LIST*- (2 8 ) p ’ GIVEN ’ , • IDENTITY » 

C253 fl 
[263 fl 
[273 fl 

[2 8 3 ft SET LIST OF ROUTINES FOR HELP CALLS 

[293 ggP- t-l 

[303 GS*-2 

[313 GPM* ^Z 

[323 gg^4 

[33 3 GN*-5 

[34 3 gJ-^6 

[ 353 GHM-*V 

[363 GNBV- ^Z 

[373 gSF-^9 

[ 383 g^-f-1 0 

[ 393 gjy- ^1 1 

[40] GGM* -1 2 

[413 SFV*-1 3 

[42 3 g77- «-14 

[43 3 GNTS* -1S 

[443 g^7-<-16 

[45 3 GDV- C17 

[46] MET*-18 

[47] n 

[48] R SET NUMBER OF HELP ROUTINES 
[493 NUMHELPRO UTINES*-! 8 

[50] fl 

[513 n SET VARIABLE DEFINITION SWITCHES, 1 IF VARIABLE DEFINED, 
IF NOT. 

[52] DEFN UMPHA SES*-0 

[53] DEFNUMSTATES*-0 
[54 3 DEFP*tQ 

[55 3 DEFH*-0 

[ 563 DEFNUMBASICVARIABLES-^0 
[57] DEFBASICVARIABLES*-0 
[58 3 DEFNUMACCLEV*-0 
[593 DEFNUMTRAJSETS*-0 
[60 3 DEFI*-0 

[61] DEFG*-0 

[62] DEFF*-0 
C63] DEFV*-Q 

[ 64 3 DBFPERFORMABILITY-*-0 
[65 3 DEFACCLEVEL*-0 

[66] fl 

[673 fl MAKE DEFAULT SWITCH SETTINGS 
[683 BRIEFO UTPUT*- 0 


0 
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[ 69 ] ECnOIUPUT^Q 
V 
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ECHO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result <- ECHO arg 


PURPOSE: 


To allow the input of the ECHO user 
command. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: None. 

FUNCTIONS CALLED: None. 


COMMENTS: Called when the user types 'ECHO arg' in 

response to a (non-yes/no) question. The 
valid arguments are 'ON' and 'OFF.' ECHO 
ON causes the input to be repeated back to 
the user, while ECHO OFF suppresses the 
repetition. ECHO returns a twelve 
character representation of the ECHO 
command (for INPUT) and the value of arg 
in result . For example, after the command 
ECHO OFF, the vector 'ECHO OFF ' is 
returned in result . The default is ECHO. 
OFF. 


LISTING: 

V Z-<rECHO SWITCH 
Cl] a 

[2] R ROUTINE TO INPUT THE ECHO COMMAND 
C3 ] fl 

C4] n RETURN THE VALUE 
C 5 ] Z-H » ECHO • , SWITCH 

V 


METAPHOR {VERSION 1) PROGRAMMER'S GUIDE 



75 


ENCODE 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result <- argl ENCODE arg2 


PURPOSE: To implement the encode (T) operator for 

vectors as the right hand argument (arg2). 
This function is necessary because the 
resident APL program available at The 
University of Michigan will not support 
such an encode operation. The encoded 
vector is returned in result. 


vjLOEAL VARIABLES: None. 


FUNCTIONS CALLED: None. 


COMMENTS: Given a vector as arg2 , ENCODE loops 

through each value n of the vector, 
determining^ ( argl T n) , i.e., the 

representation of n in base argl. An 
initial test is made to determine if arg2 
contains a single value, and if so, no 
looping is done. 


LISTING: 

Z<-M ENCODE N%ROW 


n THE ENCODE FUNCTION EMPLOIED ON MTS WILL NOT ACCEPT 
VECTORS AS 

^THAT^C^AP ABILITY SIDE. THIS FUNCTION SIMULATES 

R THE COMPARABLE APL NOTATION WOULD BE: MrN 

R 

fl TEST FOR A SINGLE INPUT 
^iO = (>{iN)/ ^SINGLE 

n INITIALIZE THE ARRAY AND LOOP COUNTER 

2-«-((r/l,pi\/) ,(pZ?))pO 

COL^l 

SLOOPi 2C \C0L:\^MiNIC 0L'1 
COL-^COL + 1 
■^(.COL^pN) /ELOOP 
fi EXIT 


IF ONLY ONE ARGUMENT TO BE DECODED 
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[ 19 : ^SI^GLEiZ-<^MlN 
V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 
CALLING FUNCTIONS: 
FUNCTIONS CALLED: 
COMMENTS: 


GENERATEHMATRIX 
METAPHOR FUNCTION DESCRIPTION 

result argl GENERATEHMATRIX arg2 


To supervise the construction of the H 
matrix for the given phase. 


IN, GHM, HMATRIXLIST. 


GETHMATRICES. 


INPUT, PRINT, GGIVEN, GIDENTITY, 


Asks the user what type of H matrix is 
desired for the particular phase being 
considered. Presently, METAPHOR supports 
two types of H. matrix input. For the first 
of these, the user inputs 'GIVEN' and 
enters the values of the matrix himself. 
GENERATEIIMATRIX calls ^GIVEN to accomplish 
this. The second choice is to choose an 
identity H matrix via an 'IDENTITY' input. 
If the two phases do not have the same 
number of states, an error message is 
printed and the user is again prompted for 
the H matrix type; else GENERATEHMATRIX 
calls GIDENTITY to generate an identity 
matrix. If an illegal (i.e., unsupported) 
type of^ matrix is specified, an error 
message is generated and another matrix 
type is requested. 

The resulting H matrix is required to have 
shape argl x arg2 . Argl and arg2 are 
typically the number of states in the. 
phases associated with the H matrix. 

The H matrix obtained is returned in 
result. 
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LISTING; 

V. Z-cAf GENERATEHMATEIX TYPE-, IN 
111 fl 

C2] fl 

C3] n ROUTINE FOR .SUPERVISING THE CONSTRUCTION OF THE H MATRIX 
FOR THE GIVEN PHASE 

C4 3 R THE MATRIX IS TO HAVE SHAPE M^^N 
C5 ] fl 

C6] n GET TYPE OF MATRIX 
[73 PRINT »» 

[8] GENHMI Ni PRINT ^NHAT TYPE OF H MATRIX^' 

[93 8 INPUT GHM 

[103 R CHECK FOR COMMAND 
[113 ^(1 = A e.'COMMAND')/GENHMIN 

[123 R CHECK FOR TYPE 

[13 3 -^ ( A /mATRIXLIST e ( Ji7 ) ) / GENHMGIVEN . GENHMIDEN TITY 

[143 R ELSE ILLEGAL TYPE 

[15 3 PRINT ^ILLEGAL H MATRIX TYPE. TYPE HELP FOR INFORMATION * 

[16 3 ’^‘GENHMIN 
[173 ft 
[18 3 fl 

[193 R USER WILL GIVE H MATRIX VALUES 

[20] GENHMG IVEN ; Z^M GGIVEN N 

[213 -»-o 

[223 fl 

[233 fl 

[243 fl IDENTITY MATRIX GENERATOR 

[253 fl FIRST CHECK TO MAKE SURE AN IDENTITY MATRIX IS APPROPRIATE 
HERE 

[263 GENHMI DENTITYi^{M=N) / GENHMI DENTITYGET 

PNASES do not have the same NUMBER OF 

STATES . ’ 

[283 PRINT 'AN IDENTITY MATRIX IS INAPPROPRIATE FOR THE INTERPHASE 
TRANSITION MATRIX.' 

[293. '* GENHMI N 

[30] GENHMI DENTITYGETi Z-f-GIDENTTTY N 
[313 -^0 “ 

V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 
CALLING FUNCTIONS: 
FUNCTIONS CALLED: 

COMMENTS : 


GENERATEPMATRIX 
METAPHOR FUNCTION DESCRIPTION 
result GENERATEPMATRIX arg 


To supervise the construction of the P 
matrix for the given phase. 


IN, GPM , PMATRIXLIST. 

GETPMATRICES . 

INPUT, PRINT, GDEDFAIL, GGIVEN, GIDENTITY, 
GNFAIL. ~ ~ 


Asks the user what type of P matrix is 
desired for the particular phase being 
considered. Presently, METAPHOR supports 
four types of P matrix input. For the 
first of these, the user inputs ’GIVEN' 
and enters the values of the matrix 
himself. GENERATEPMATRIX calls GGIVEN to 
accomplish this. The second choice is to 
choose an identity P matrix via an 
'IDENTITY' input. If the two phases do not 
have the same number of states, an error 
message is printed and the user is again 
prompted for the P matrix type; else 
GENERATEPMATRIX calls GIDENTITY to 
generate an identity matrix. Also, the 
user can input 'DEDFAIL' or 'NFAIL' and 
METAPHOR will construct a P matrix based 
on certain assumptions concerning the 
structure of the system being modeled. The 
functions called to perform the generation 
are GDEDFAIL and GNFAIL. If an illegal 
(i.e.,^ unsupported) type of matrix is 
specified, an error message is generated 
and another matrix type is requested. 

The resulting P matrix is required to have 
shape argxarg. Arg is typically the number 
of states in the phase associated with the 
P matrix. 

The P matrix obtained is returned in 
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result. 


LISTING: 

V Z-^GENERATEPMATRIX N%TYPE%IN 
Cl ] a 
[23 fi 

^ routine for supervising tee construction of the p matrix 

FOR THE GIVEN PHASE 

C4 3 n THE MATRIX IS TO HAVE SHAPE Nx-N 

[5 3 a 

[63 a GET TYPE OF MATRIX 
[73 PRINT » ’ 

[83 GEN PM I N : PRINT 'WHAT TYPE OF P MATRIX^' 

[93 8 INPUT GPM 

[103 a CHECK FOR COMMAND 

[113 ->(1 = A e'COMMAND' ) / GENPMIN 

[123 a CHECK FOR TYPE 

[13 3 -»•( f^/mATRIXLISTe ( 

IN ) ) / ^NPMG IVBN , GENPMD EDFAIL ,GENPMNFAIL .GBNPMIDENTITY 
[143 a ELSE ILLEGAL TYPE 

[153 PRINT 'ILLEGAL P MATRIX TYPE. TYPE HELP FOR INFORMATION' 

[16 3 ->GENPMIN 
[173 a 
[18 3 a 

[193 a USER WILL GIVE P MATRIX VALUES 

[2 0 3 GENPM GIVEN t Z^N GGIVEN N 

[213 ^0 

[223 a 

[233 a 

[243 a DEDICATED COMPONENT SYSTEM 
[251 GENPMD EDFAIL ; Z*-GDEDFA TT. N 

MILBD. so back to trx agaib. else exit 

[273 ->((Z[1 ;13<0) ,l)/ ggi7Pj\/J i7,0 

[28 3 a 
[293 a 

[303 a N GROUPS OF COMPONENTS SYSTEM 

[313 GENPMN FAIL : Z^GNFAIL N 

[323 ->0 

[333 a 

[343 a 

[353 a IDENTITY MATRIX GENERATOR 
[3 6 3 GEN PM I D EN TITYiZ-*- GID EN TITY N 
[373 ^0 “ 

V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 

CALLING FUNCTIONS; 

FUNCTIONS CALLED: 

COMMENTS : 


GETACCLEVPROB 

METAPHOR FUNCTION DESCRIPTION 
result GETACCLEVPROB arg 


To determine- the probability of arg, where 
arg is an accomplishment level. 


DEFF, DEFG, DEFI, DEPMUMTRAJSETS , DEFV, 
NUMTRA JSETS . 


GETPERFORMAB I LI T Y . 

1 INDEX (;GETPERFORMABILITY, METAPHOR 
function’ ) 


CALCTRAJPROB , GETNUMTRAJSETS GETFVECTOR, 
GETGMATRICES, GETIVECTOR, GETWALUES , 
PRINT, PRINTQUAD. “ 


GETACCLEVPROB controls the inputting of 
the information required to obtain the 
probability of the hierarchy level given 

particular, GETACCLEVPROB 
requests the number of trajectory sets in 
the accomplishment level, and then for 
each set, fetches the initial vector, the 
characteristic matrices the characteristic 
vector, and the characterization of the 
time-invariant basic variables. The 
probabilities of each trajectory set is 
then calculated and added to the 
probability of the accomplishment set. 
Finally, the definition flags associated 
with the trajectory set information are 
reset before the function is exited; this 
insures that the ALTER and DISPLAY 
commands do not try to access these 
variables outside the GETACCLEVPROB 
function. 

The performability is returned in result. 
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LISTING: 

7 Z-^ GET ACC LEV PRO B LEVEL',TiTRAJPROBiNUMTRA<ISETS\I%G\F\V 
[1 ] fi 

[2] R ROUTINE FOR DETERMINING THE PROBABILITY OF AN 
ACCOMPLISHMENT LEVEL 

[3] ft 

C4] ft INITIALIZE TEE COLLECTION VARIABLE ' 

CS] Z'^-Q 
C6] ft 

t73 ft GET TEE NUMBER OF TRAJECTORY SETS 
[8 3 NUMTRAJSETS-^GETNUMTRAJSETS LEVEL 

[9] H LOOP THROUGH FOR EACH SET, GETTING ITS VALUES AND 
CALCULATING ITS PROBABILITY 

[10] ft INITIALIZE COUNTER 

[11] r-^i 

[12] GAPT L00Pi\!\^{ {PRINTQUAD 'TRAJECTORY SET ')iPRINTQUAD T) 

[13] PRINT ' ’ 

[14] I-<-GET£V ECTOR 

[15] G->- GETGMA TRIC ES 

[16] F^GETFVECTOR 

[17] V-^GETVVAL UES 

[18] TRAJPROB^CALCTRAJPROB 
[ 1 9 ] ft 

[20] n ADD THE PROBABILITY TO TEE COLLECTION VARIABLE 

[21] Z^Z+TRAJPROB 

[22] ft 

[23] R INCREMENT TRAJECTORY COUNTER AND BRANCH IF NECESSARY 

[ 24 ] T^T + 1 

[25] -*{T^NUMTRAJSETS) / GAPTLOOP 

[26] ft RESET DEFINITION FLAGS 

[27] DEFN UM TRAJ SETS-^DEFI^DEFG^DEFF*- DEFV-<^0 

V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 
CALLING FUNCTIONS: 
FUNCTIONS CALLED: 
COMMENTS! 


GETALTERVECTOR 

METAPHOR FUNCTION DESCRIPTION 
result GETALTERVECTOR 

To determine which data the user wishes to 
change. 

GAV. 


COMMANDALTER. 


PRINT, COMMANDHELP. 


The user is presented a line containing 
abbreviations of the variables which can 
be changed. The user then prints an X 
below each variable he wishes to alter. 
GETALTERVECTOR returns a vector in result 
with I's corresponding to those variables 
to be altered, and O's corresponding to 
those not to be altered. The position of 
the I's and O's has the following code: 

Index 1 — 'Alter the P matrices. 

Index 2 — Alter the H matrices. 

Index 3 — Alter the time-invariant basic 
variables. 

Index 4 — Alter the values of all 
accomplishment levels. 

Index 5 — Alter the values of just the 
present accomplishment level. 

Index 6 — Alter the initial vector. 

Index 7 — Alter the characteristic 
matrices. 

Index 8 — -Alter the characteristic vector. 

Index 9 — Alter the characterization of the 
time-invariant basic variables. 
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Index 10 — Alter the number of trajectory 
sets. 


LISTING: 

V Z^GETALTERVECTORiGAVTNPUT 
Cl3 fl 

[2] n ROUTINE FOR GETTING THE ALTER VECTOR FOR CHANGING DATA 

[3] fl 

[4] R PRINT EXPLANATION 

Cs: GAVIN: PRINT ^PUT AN X BELOW EACH ITEM TO BE CHANGED, HELP 

AVAILABLE . » 

[6] R GET ALTER REQUESTS, RESHAPING ALONG THE WAX 
C7j PRINT ’F H CONST .BAS. VARS ALL .ACC .LEVELS 
PRESENT .ACC .LEVEL I G F V NUM .TRAJ .SETS^ 

C8] GAVI NPUT^SOpiE.iSQo * ’)) 

C9] fl LOOK FOR HELP REQUEST. IF PRESENT, CALL FOR HELP ROUTINE. 
CIO j HELP^ S.GAVINPUT) / GAVVECTORSET 

Cll] COMMANDH ELP GAV 
C 1 2 ] ->- GAVI N 

[133 fl INITIALIZE ALTER VECTOR 
[14 3 GAV VECTORSET: 2-t-lOoQ 
[153 fl DETERMINE CHANGE VECTOR 
[163 Z[l3^*2’eG^7Ji7FFT[l3 

[173 Zl2'\^^ X' €. GAVI NPUTm:\ 

[193 Z[43-^*’;Sr»€£^Ii'/PFr[22 + il43 

[203 Zl5l^^ X^ € GAVI NPUTLZQ + x 173 
[213 ZlSl^^ X' ^ GAVI NPUTtSQl 
[223 Zni-*-^X' eGAVINPUTl&ll 

[233 2[8 3^’Z»€ff/!7IAfFFT[643 

[243 Z[9 3-<-’J»€5£7J^FF2’[66 3 

[253 Z[10 3'^’ J»eff^7Ii7FF2’[67 + il3 3 

V 
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GETBASIC VAR TABLES 
METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETBASIC VAR TABLES 


PURPOSE: To obtain the probabilities of the time- 

invariant basic variables. 


GLOBAL VARIABLES: BASICVARIABLES , DEFBASICVARIABLES , IN, 

NUMBASIC VARIABLES, GBV. 


CALLING FUNCTIONS: COMMANDEVAL. 


FUNCTIONS CALLED: CHECKPROB, INPUT, PRINT. 


COMMENTS: Asks the user for the probabilities of the 

time-invariant basic variables, inputs the 
probabilities, checks them, and places 
then in BASICVARIABLES . If these values 
are not proper probabilities (i.e., 
numbers between zero and one) , the query 
is repeated. In addition, the definition 
flag associated with BASICVARIABLES is set 
so that the probabilities of the time- 
^ invariant basic variables can be displayed 
or changed. 


LISTING: 

V GETBASICV ARIABLES 

[11 fl 

[2] fl ROUTINE FOR FETCHING THE PROBABILITIES OF EACH OF THE 
TIME ^INVARIANT BASIC VARIABLES 

[3] fl 

[4] fi SEE IF IT IS NECESSARY TO INPUT BASIC VARIABLES 

[5] ■*{NUMBASICVARIABLES=Q) /O 

[ 6 ] Pi 

[..7] rINPUT PROBABILITIES AND CHECK VALIDITY 
[ 8 1 PRINT > ' 

[9] GBV I N i PRINT ^PROBABILITIES OF EACH TIME- INV ARI ANT BASIC 
VARIABLE? {SPACE BETWEEN EACH NUMBER)' 

[10 3 NUMBASICV ARIABLES INPUT GBV 
[113 fi CHECK FOR COMMAND 
[123 ^(1=A COMMAND' )/ GBVIN 

[133 ft CHECK FOR PROPER PROBABILITY MAGNITUDE 
[14 3 ■^{CHECKPROB IN) / GBV I N 

[153 R SET BASIC VARIABLE PROBABILITIES AND EXIT 
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[16] BASICVARIABLES^IN ,1-IN 

[17] DEFBASICVARIABLES^l 
V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 
ALLING FUNCTIONS: 
FUNCTIONS CALLED: 
COMMENTS : 


GETDATA VECTOR 

METAPHOR FUNCTION DESCRIPTION 
result <- GETDATAVECTOR 

To determine which data the user wishes to 
display. 

GDV. 


COMMANDD ATA. 

PRINT, COMMANDHELP. 


The user is presented two lines containing 
abbreviations of the variables which can 
be displayed. The user then prints an X 
below each variable he wishes to have 
shown. GETDATAVECTOR returns in result a 
vector with I's corresponding to those 
variables to be displayed, and O's 
corresponding to those not to be 
displayed. The position of the I's and O's 
has the following code: 


Index 1 — Display the number of phases. 

Index 2 — Display the number of states in 
each phase. 


Index 3 — Display the P matrices. 
Index 4 — Display the H matrices. 


Index 5 — Display the number of time- 
invariant basic variables. 


Index 6 — Display the probabilities of each 
of the time-invariant basic variables. 

Index 7 — Display the number of 
accomplishment levels. 

Index 8 — Display the number of trajectory 
sets . 


\ 
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Index 9 — Display the initial vector. 

Index 10 — Display the characteristic 
matrices . 

Index 11 — Display the characteristic 
vector. 

Index 12 — Display the characterization of 
the time-invariant basic variables. 

Index 13 — Display the performabil ity . 


LISTING; 

V Z^GETDATAVECTORiGDVINPUT 
Cl] P! 

[2] n ROUTINE FOR GETTING THE DATA VECTOR FOR DISPLAYING DATA 
C3] fl 

C4] fl PRINT EXPLANATION 

C5] GDVI N i PRINT 'PUT AN X BELOW EACH ITEM TO BE DISPLAYED., HELP 
AVAILABLE, ' 

[6] n GET DATA REQUESTS, RESHAPING ALONG THE WAY 
C7] PRINT 'NUM .PHASES NUM .STATES P H NUM .CON ST .BAS ,V ARS 
PROS. CONST .BAS. VARS ' 

[8] (69p ’ ’)) 

[9] nLOOK FOR HELP REQUEST. IF PRESENT, CALL FOR HELP ROUTINE 
CIO] ■^{~h/'HELP'€.GDVINPUT) /GDVINCONT 

Cll] COMMANDH ELP GDV 

Cl2] -^ GDVI N 

Cl3] GDVI NCONT: PRINT 

'NUM .ACC .LEVELS NUM .TRAJ .SETS I G F V PERF' 

Cl4] GDVINPUT^11^q{GDVINPUT ' ')) 

C 1 5 ] PRINT ' ' 

Cl6] nLOOK FOR HELP REQUEST. IF PRESENT, CALL'FOR HELP ROUTINE 
Cl7] HELP ' e GDV IN PUT ) / GDVVECTORSET 

Cl 8] COMMANDHELP GDV 
C 1 9 ] -‘■ GDVI N 

C20] n INITIALIZE DISPLAY VECTOR 
C21] GDVV ECTORSET iZ-^rXZpO 
C22] n DETERMINE DISPLAY- VECTOR 
C23] ZCl>'Z»eGZ?7XffPZ/lPCi 10] 

C24] ZC2>*X’€GP7Ii7PPTCl2 + ilO] 

C25] ZlZl-^^'X' eGDVINPUTllhl 
C26] X' eGDV IN PUT 12Z1 

C27] ZlSl-^^'X' eGDVINPUTlZO + xlZl 
C28] Zle'^-^' X' eGDVINPUTlZO-^xlSl 

C29] Zlll-i-'X' eGDVINPUTW+xm-2 
C30] ZiZl-^' X' eGDVINPUTlZS + xlZl 

[31] ZlZl-^'X' eGDVINPUTllQll 

[32] ZllQl-^-'X' €GDVINPUTllGt\l 

[33] ZZlll-^'X' eGDVINPUTllOll 

[34] Zil2l^' X' €GDVINPUT1110^ 
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[35] 2Cl3>*Z»eG!i)l^Ii'/P£/2’i:il2 + i4] 

V 
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GETNUMACCLEV 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETNUMACCLEV 


PURPOSE: To obtain the number of accomplishment 

levels in the model. 


GLOBAL VARIABLES: DEFNUMACCLEV, IN, NUMACCLEV, GNA. 


CALLING FUNCTIONS: COMMANDEVAL. 


FUNCTIONS CALLED: CHECKPOSI, INPUT, PRINT. 


COMMENTS: Asks the user for the number of 

accomplishment levels, inputs the number, 
checks it, and places it in NUMACCLEV. If 
the value is not a positive integer, the 
query is repeated. In addition, the 
definition flag associated with NUMACCLEV 
is set so that the number of 

accomplishment levels can be displayed or 
changed. 


LISTING: 

V GETNUMACCLEV 

Cl ] fl 

[2] R 

[33 fi ROUTINE FOR FETCHING THE NUMBER OF MISSION ACCOMPLISHMENT 
LEVELS 
[4] fl 

[51 fl INPUT NUMBER OF ACCOMPLISHMENT LEVELS 
[63 PRINT * » 

[73 GNAI N : PRINT ^NUMBER OF ACCOMPLISHMENT LEVELS?^ 

[83 1 INPUT GNA 

[93 fl CHECK FOR COMMAND 
[103 ->(1 = A c'COMMAND^)/ GNAIN 

[113 n CHECK VALIDITY OF INPUT 
[12 3 -^iCHECKPOSI IN) / GNAI N 

[133 fi ELSE SET THE NUMBER OF ACCOMPLISHMENT LEVELS AND EXIT 
[14 3 NUMACCLEV-^IN 
[15 3 DEFNUMACCLEV-^1 

V 
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GETNUMBASIC VAR TABLES 
METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETNUMBASICVARIABLES 


PURPOSE; To obtain the number of time— invar iant 
basic variables. 


GLOBAL VARIABLES: DEFNUMBASICVARIABLES , IN, 

NUMBASICVAR TABLES, GNBV. 


CALLING FUNCTIONS; COMMANDEVAL. 


FUNCTIONS CALLED: CHECKPOSI, INPUT, PRINT. 


COMMENTS; Asks the user for the number of time- 
invariant basic variables, inputs the 
number, checks it, and places it in 
NUMBASICVARIABLES . If the value is not a 
positive integer, the query is repeated. 
In addition, the definition flag 
associated with NUMBASICVARIABLES is set 
so that the number of time-invariant basic 
variables can be displayed or changed. 


LISTING: 

GETIJUMBASICV ARIABLES 

Cl] ft 

£21 a 

C3] fl ROUTINE FOR FETCHING THE NUMBER OF TIME- INV ARI ANT) BASIC 
VARIABLES 
C4] . n 

[5] fi INPUT NUMBER OF TIME- INV ARI ANT B ASIC.- V ARI ABIES 
C 6 ] PRINT » ’ ■ 

C7] GNBVI Ni PRINT ^NUMBER OF TIME- INV ARI ANT BASIC VARIABLES^' 

[8] 1 INPUT GNBV 

C9] a CHECK FOR COMMAND 

CIO] -s-(l = A COMMAND' ) /GNBVIN 

Cll] n CHECK VALIDITY OF INPUT 

[12] ^{IN=Q)/ GNBVS ET 

[13] -^{CHECKPOSI IN) / GNBV I N 

[14] a ELSE SET THE NUMBER OF TIME- INV ARI ANT BASIC VARIABLES AND 
EXIT 

[15] GNBVS ETiNUMBASICVARIABLES*-IN 

[16] DEFNUMBASICVARIABLES-<-l 
7 
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GETNUM PHASES 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETNUMPHASES 


PURPOSE: 
GLOBAL VARIABLES: 
CALLING FUNCTIONS: 
FUNCTIONS CALLED: 


To obtain the number of phases. 
DEFNUMPHASES, IN, NUM PHASES, GNP . 
CQMMANDS VAL. 

CHECKPOSI, INPUT, PRINT. 


COMMENTS: Asks the user for the number of phases, 

inputs the number, checks it, and places 
it in NUMPHASES. If the value is not a 
positive integer, the query is repeated. 
In addition, the definition flag 
associated with NUMPHASES is set so that 
the number of phases can be displayed or 
changed , 


LISTING: 

V GETNUMPHASES 
Cl] fl 
C2] fl 

C3] n ROUTINE FOR FETCHING THE NUMBER OF MISSION PHASES 
C4] fi 

C5] n INPUT NUMBER OF PHASES 
C 6 ] PRINT » » 

[7] GNPI N ; PRINT 'NUMBER OF PHASES?' 

C8] 1 INPUT GNP 

C9] ft CHECK FOR COMMAND 

[10] ■>Cl = A e'COMMAND' )/ GNPIN 

[11] a CHECK VALIDITY OF INPUT 

[12] ^ ( CHECKPO SI IN ) / GNPI N 

[13] ft ELSE SET THE NUMBER OF PHASES AND EXIT 

[14] NUM PH A SES-^IN 

[15] DEFNUM PHASES^! 

7 
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GETMUMTRAJSETS 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; GETMUMTRAJSETS 


PURPOSE: To obtain the number of trajectory sets in 

the accomplishment level being considered. 

GLOBAL VARIABLES: DEFNUMTRA JSETS , IN, NUMTRAJSETS, GNTS . 


CALLING FUNCTIONS: GETACCLEVPROB. 


FUNCTIONS CALLED: CHECKPOST, INPUT, PRINT. 


COMMENTS: Asks the user for the number of trajectory 

sets in the accomplishment level being 
considered, inputs the number, checks it, 
and places it in NUMTRAJSETS. If the value 
is not a positive integer, the query is 
repeated. In addition, the definition flag 
associated with NUMTRAJSETS is set so that 
the number of trajectory sets in the 
accomplishment level being considered can 
be displayed or changed. 


LISTING; 

V Z-<-GETNUMTRAJSETS L 
m ft 
C2] ft 

ROUTINE FOR FETCHING THE NUMBER OF ACCOMPLISHMENT LEVEL 
TRAJECTORY SETS FOR LEVEL L 
C4 j ft 

CS] n INPUT NUMBER OF TRAJECTORY SETS 
C 6 : PRINT » » ■ ' ; 

[7j {PRINT QUAD ^ACCOMPLISHMENT LEVEL iPRINTQUAD L-l) 

[8] PRINT 

C9j G^SIN ; PRINT ^NUMBER OF TRAJECTORY SETS FOR THIS ACCOMPLISHMENT 
LEVEL?' 

CIO] 1 INPUT GNTS 
Cll] ft CHECK FOR COMMAND 
Cl2] h-(i=a e'COMMAND' ) / GNTSIN 
Cl3] n CHECK VALIDITY OF INPUT 
Cl4] ^{CHECKPOSI IN) / GNTS I N 

Cl 5] ft ELSE SET THE NUMBER OF ACCOMPLISHMENT LEVELS AND EXIT 
L 1 6 J Z<-IN 
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[ 17 ] BEFW VMTEAJSETS-^ 1 
V 
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GETPERFORMAB ILITY 
METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETPERFORMABILITY 


PURPOSE: 

GLOBAL VARIABLES: 

CALLING FUNCTIONS: 
FUNCTIONS CALLED; 


To determine the performabi 1 i ty for the 
model given METAPHOR 


DEFACCLEVEL, DEFPERFORMAEILITY, NUMACCLEV, 
PERFORMABILITY. 


COMMANDEVAL. 


GETACCLEVPROB. 


For each accomplishment level, GETPERF 
calls ^ GETACCLEVPROB to determine the 
probability of that accomplishment level. 
That result is stored in the 
performability vector, PERFORMABILITY. 
GETPERF also sets the definition flags 
associated with ACCLEVEL and 
PERFORMABILITY before callincr 
GETACCLEVPROB so that the performability 
and the information associated with a 
particular accomplishment level can be 
altered and displayed. Before exiting, 
GETPERF resets the ACCLEVEL definition 
flag. - 


Cl] 

C2] 

C3] 

[ 4 ] 

[5] 
C6] 
C7] 
C8] 
C9] 
[ 10 ] 
[ 11 ] 
[ 12 ] 
[13] 


LISTING; 

V GETPERFORMABILITY I LEV ELPR0B%L 
a 

R ROUTINE FOR COMPUTING TEE PERFORMABILITY OF THE SYSTEM 
a 

a INITIALIZE THE PERFORMABILITY VECTOR AND SET DEFINITION 
FLAGS 

PERFORMABILITY^NUMACCLEV pQ 
DEFACCLEVEL^l 
DE FPERFO RMA B IL ITY-f - 1 
a 

a LOOP THROUGH EACH ACCOMPLISHMENT LEVEL 

a INITIALIZE LEVEL COUNTER 

L^l 


a GET THE PROBABILITY OF EACH ACCOMPLISHMENT LEVEL 
^LOOP: LEVELFROB-^GETACCLEVPROB L 
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n INSERT THE PROBABILITY INTO THE PERFORM ABILITY VECTOR 
Cl 5 3 PERFORM ABILITYZL'^^LEVELPROB 

Cl6] Ft INCREMENT THE LEVEL COUNTER AND BRANCH IF NECESSARY 
[173 L^L+1 

[183 ■*iL<NVMACCLEV') /GPLOOP 

[193 fl ELSE EXIT ROUTINE, SETTING DEFINITION FLAG 
[20 3 DEFACCLEVEL-<-0 
V 
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GETSTATES 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETSTATES 


PURPOSE: To obtain the number of states in each 

phase of the model. 


. GLOBAL VARIABLES: DEFMUMSTATES , IN, NUMSTATES, 

STATESPERPHASE. 


CALLING FUNCTIONS: COMMANDEVAL. 


FUNCTIONS CALLED; CHECKPOSI, INPUT, PRINT. 


COMMENTS; Asks the user for the number of states in 
each phase of the model, inputs the 
probabilities, checks them, and places 
then in STATESPERPHASE. If these values 
not positive integers, the guery is 
repeated. In addition, the definition flag 
associated with STATESPERPHASE is set so 
that the number of states in each phase of 
the model can be displayed or changed. 


LISTING: 

V GETSTATES 

Cl] a 

^2] a ROUTINE FOR FETCHING THE NUMBER OF STATES IN EACH PHASE 
L 3 J a 

[4] f^INPUT NUMBER OF STATES AND CHECK VALIDITY 
C 5 ] PRINT » ' 

OF STATES PER PHASE? {SPACE BETWEEN EACH 

C7] NUMPHASES INPUT G5 
C8] n CHECK FOR COMMAND 
C9] 1 ) /GS IN 

[10] n CHECK FOR POSITIVE INTEGER 

[11] ^{CHECKPOSI IN)/GSIN 

[12] a SET STATES AND EXIT 

[13] ST A TESPERPHA SE*-IN 

[14 ] MAXNUMSTATES^U STATESPERPHASE 

[15] DEFN UMSTA TES*- 1 
7 
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GETFVECTOR 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result <- GETFVECTOR 


PURPOSE: To input and check the characteristic 

vector for the trajectory set under 
consideration. 


GLOBAL VARIABLES: IN, STATESPERPHASE , GFV. 


CALLING FUNCTIONS: GETACCLEVPROB . 


FUNCTIONS CALLED: CHECKBIN, INPUT, PRINT. 


COMMENTS: Asks the _ user for the value of the 

characteristic, vector for the phase under 
consideration, inputs the vector, checks 
it for proper binary values, and returns 
it in result . If these values are not 
proper binary quantities (i.e., 0 or 1), 
the query is repeated. In addition,- the 
definition flag associated with F is 'set 
so that the F vector can be altered or 
displayed . 


LISTING: 

V Z-^GETFVECTOE 

Cl] fl “ 

C23 fl ROUTINE FOR INPUTTING FINAL STATE VECTOR 
[3] fl 

C»<-] n INPUT AND CHECK THE F VECTOR 

C5] G^INi PRINT CENTER THE F VECTOR {SPACE BETWEEN 

C6] STATESPERPHASEINUMPHASES^INPUT GFV 

C73 fl CHECK FOR COMMAND 

[8] ^(1=A COMM AND ^ GFV IN 

C9] fl CHECK VALIDITY OF INPUT, 

C 1 0 : ^{CHECKBIN IN ) / GFV IN 

Cll] fi SET F VECTOR AND LEAVE 

[12 ] Z-f-{MAXNUMSTATES ,l)(iIN , {M AXNUM ST ATE S oQ) 

[13] DEFF-^1 


EACH ENTRY) : ♦ 


V 
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GETG MATRICES 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result GETGMATRICES 

PURPOSE: To input and check the characteristic 

matrices for the trajectory set under 
consideration. 

GLOBAL VARIABLES: IN, STATES PERPHASE , GGM. 

CALLING FUNCTIONS; GETACCLEVPROB . 


FUNCTIONS CALLED; CHECKBIN, INPUT, PRINT. 


COMMENTS: Asks the^ user for the values of the 

characteristic matrices for the phase 
under consideration, inputs the matrices, 
checks them for proper binary values, and 
returns them in result . If these values 
are not proper binary quantities (i.e., 0 

or 1), the query is repeated. In addition, 
the definition flag associated with G is 
set so that the G matrices can be altered 
or displayed. 


Cl] 

C2] 

C3] 

C4] 

C5] 

[ 6 ] 

C7] 

C8] 

C9] 

CIO] 

Cll] 

Cl2] 

C13] 


LISTING: 

V Z<-GETGMATEICES; PHASE 

fi 

” „ INPUTTING THE G MATRICES FOR A TRAJECTORY 

O ti 1 

^ WILL BE REPRESENTED AS A VECTOR OF ITS 

DIAGONAL ELEMENTS 

n 

^ MATRIX, ALSO SET DEFINITION 

h LAG 

Z^^MAXNUM ST A TES ,MAXNUMSTA TES ) q 0 
DEFG^X 

R 


R LOOP THROUGH EACH PHASE EXCEPT THE LAST 
MATRICES ’ 

R INITIALIZE THE PHASE COUNTER 
PHASE^l 


GETTING THE G 


R INPUT AND CHECK THE G VECTOR 

G^INi^H^^iPRINTQUAD ^ PHASE ^)UPRINTQUAD PHASE) iPRINTQUAD 

* ) 
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[14 3 PRIl^T »» 

[153 PRINT CENTER THE G DIAGONAL {SPACE BETWEEN EACH ENTRY) 

[163 STATESPERPHASElPHASElINPUT GGM 

[173 n CHECK FOR COMMAND 

[183 ->-(l=A g 'COMMAND' ) / GGMI N 

[193 n CHECK VALIDITY OF INPUT. 

[2 0 3 -^{CHECKBIN IN) / GGMI N 

[213 n PLACE THE INPUT IN THE SET OF G VECTORS 
[223 ZlPHASEixpINl^IN 

[233 n INCREMENT THE PHASE COUNTER AND BRANCH IF APPROPRIATE 
[243 PH A SEMPRA SE + 1 
[253 ^{PHASE<NUMPHASES) / GGMIN 
7 
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GETHMATRICES 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GETHMATRICES 


PURPOSE: To supervise the input of the & matrices 

for the model. 


GLOBAL VARIABLES: DEFH, H, MAXNUMSTATES , NUMPHASES, 

STATESPERPHASE. 


CALLING FUNCTIONS; COMMANDE VAL. 


FUNCTIONS CALLED: GENERATEHMATRIX, PRINT, PRINTQUAD. 


COMMENTS; Fetches the H matrix for each phase 

transition via the GENERATEHMATRIX 
function. Each H matrix is then placed in 
the variable H. A message is printed at 
the beginning of the function informing 
the user that he is to enter the 
interphase transition matrices. Finally, 
before ^ the function is exited, the 

definition flag associated with H is set, 
thus allowing H to be altered and 

displayed . 


LISTING; 

V GETHMATRICES ; PHASE ; NEXTH 
Cl] n “ 

C2] ft ROUTINE FOR INPUTTING THE H MATRICES 
C3.] R 

Cm- 3 fi ONE MATRIX FOR EACH PHASE 

[5 ] fi 

C6] n IF NO H_ MATRICES, SET H^l AND LEAVE 

[7] ■^{NUMPHASES>2) /GHMMULTIPHASE 

[ 8 ] H^ 1 1 ,lpX 

[9] fl INITIALIZE THE ARRAY OF H MATRICES 

ClO] U^MULTIPHASE: H-(-(.iNUMPHASES-X) ,MAXNUMSTATES , M AXNUM STATES) oQ 
Cll] H 

Cl2] fi INPUT AND CHECK THE H MATRICES 

[13] PRINT •» 

[14] PRINT 

[15] PRINT 'SPECIFY THE H MATRICES FOR EACH PHASE, X PHASE AT A 

TIME^ ^ 

[ 1 6 ] fl 
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Cl7] fl 

Cl 8] n INITIALIZE PHASE COUNTER 
Cl 9 3 PHASER! 

C 2 0 ] GHM P HASE IN : PRINT ' » 

C213 \H^{(.PRINTQUAD ^ PHASE niiPRINTQUAP PHASE-l) -APRINTQUAV 
’ - ’ ) ; (.PRINTQUAD PHASE) ; PRINTQUAD » : » ) 

C223 PRINT " 

C23] fl GET H MATRIX FOR PHASE 

C24 3 NEXTH^STATESPERPHASElPHASE-i:\GENERATEHMATRIX 
statesperphaseiphase:\ ~ 

C253 fi INSERT THE MATRIX INTO THE ARRAY OF MATRICES 
C263 HlPHASE-1 ; xSTATESPERPHASElPHASE-llt 
i STATESPERPHASEIPHASEI "i^-NEXTH 
C273 PI 

C283 n INCREMENT ROW COUNTER AND BRANCH IF APPROPRIATE 
C 2 9 3 PHASE-^PHASE + 1 
C 3 0 3 -*{ PH A SEi NUMPHA SES ) / GHMPHA SEIN 

C313 fl ELSE SET H DEFINITION FLAG AND LEAVE 
C323 DEFH^l 
7 
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GETp/ECTOR 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; result GETIVECTOR 


PURPOSE: To input and check the initial vector for 

the trajectory set under consideration. 


GLOBAL VARIABLES: IN, STATESPERPHASE , GIV. 


CALLING FUNCTIONS: GETACC LEVPROB . 


FUNCTIONS CALLED; CHECKBIN, INPUT, PRINT. 


COMMENTS; Asks the user for the value of the initial 
vector for the phase under consideration, 
inputs the vector, checks it for proper 
binary values, and returns it in result . 
If these values are not proper binary 
quantities (i.e., 0 or 1), the query is 

repeated. In addition, the definition flag 
associated with I is set so that the I 
vector can be altered or displayed. 


LISTING: 

V Z^GETIVECTOR 

Cl] a 

[2] fl ROUTINE FOR INPUTTING INITIAL STATE VECTOR 
C3] a 

[4] n INPUT AND CHECK THE I VECTOR 

[5] GIVINi PRINT 'ENTER THE I VECTOR {SPACE BETWEEN EACH ENTRY)-.' 

[6] STATESPERPHASELllINPUT GIV 

[7] a CHECK FOR COMMAND ' 

[8] ->(1 = A ^'COMMAND' )/ GIVIN 

[9] a CHECK VALIDITY OF INPUT. 

[10] ^{CHECKS IN IN) /GIV IN 

[11] a SET I VECTOR AND LEAVE 

[12] Z^MAXNUMSTATESpIN AMAXNUMSTATESpf^) 

[13] DEFI^l 

V 
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GETPMATRICES 

METAPHOR FUMCTION DESCRIPTION 
CALLING SEQUENCE: GETPMATRICES 


PURPOSE: To supervise the input of the P matrices 

for the model. 


GLOBAL VARIABLES: DEEP, P, MAXNUMSTATES , NUMPHASES, 

STATES PERPHASE. 


CALLING FUNCTIONS: COMMANDEVAL. 


FUNCTIONS CALLED; GENERATE PMATRIX, PRINT, PRINTQUAD. 


COMMENTS: Fetches the P matrix for each phase via 

the GENERATEPMATRIX function. Each P 

matrix is then placed in the variable P. A 
message is printed at the beginning of the 
function informing the user that he is to 
enter the transition matrices. Finally, 

before the function is exited, the 

definition flag associated with P is set, 
thus allowing P to be altered and 

displayed. 


LISTING; 

V GETPMATRICES ; PH A SE ; HEX TP 
Cl] PI “ 

C2] n ROUTINE FOR INPUTTING THE P MATRICES 

[3] PI 

[4] fl ONE MATRIX FOR EACH PHASE 

C5] PI 

[6] fi INITIALIZE THE ARRAY OF P MATRICES 

[7] P-^{NUMPHASES ,MAXNUMSTATES ^MAXNUMSTATES) pO 

C 8 ] n 

[9] fi INPUT AND CHECK THE P MATRICES 

CIO] PRINT *» 

C 1 1 ] PRINT ’ » 

C12] PRINT ^SPECIFY THE P MATRICES FOR EACH PHASE, 1 PHASE AT A 

TIME^ 

C 13 ] n 

C 1 ' 

Cl 5] n INITIALIZE PHASE COUNTER 

CIS] PHASE^l 

Cl 7] GPMPHASEINi PRINT »» 
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[183 \!^^{{PRINTQUAD 'PHASE ' ) % {PRINTQUAD PHASE) % PRINT QUAD »:») 
[19] PRINT ’ » 

[203 fl CBT P MATRIX FOR PEASE 

[21] NEXTP-<^GENERATE^ATRIX state SP.ERPHASE lPHASE'^ 

[22] R INSERT THE MATRIX INTO THE ARRAI OF MATRICES 
[23 ] PlPHASE', xSTATESPERPHASElPHASEl ; 

xSTATESPERPUASElPHASE'} 'i^NEXTP 

[2i;] R 

[25] n INCREMENT ROW COUNTER AND BRANCH IF APPROPRIATE 

[26] PHASE^PHASE+1 

[27] -> ( PH A SE^NUMPHA SES) / GPMPHA SEIN 

[28] R ELSE SET P DEFINITION FLAG AND LEAVE 

[29] DEFP^l 
V 
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GET WA LUES 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; result <- GETWALUES 

PURPOSE: To input and check the characterization of 

the time-invariant basic variables for the 
trajectory set under consideration. 

GLOBAL VARIABLES; IN, NUMBASICVARIABLES , GW. 

CALLING FUNCTIONS: GETACCLEVPROB . 


FUNCTIONS CALLED; CHECKBIN, INPUT, PRINT. 


COMMENTS; Asks the user for the value of the 
characterization of the time— invariant 

basic variables for the phase under 
consideration, inputs the vector, checks 
it for proper binary values, and returns 
It in result . If these values are not 
proper binary quantities (i.e., 0 or 1), 
the query is repeated. In addition, the 
definition flag associated with V is set 
so that the V vector can be’ altered or 
displayed . 


LISTING; 

V Z-^GETVVAL UES i-GVVTRUE i^GVV FALSE 
Pi . 

PROsTBILiTIES^^ TIME-^INVARIANT BASIC VARIABLE 

fl 

fi INPUT AND CHECK THE V VECTOR 
Z^Q 

DEFV-^1 

^(.NUMBASICVARIABLES^O) /Q 

gvvini^-<-{ {print quad center the ^ ) 'APRINTQUAD 
NUMBASICVARIABLES) iPRINTQUAD ’ ELEMENT TIME+INV ARIANT BA^IC 

{SPACE BETWEEN EACH BNTbT): ’" 

numbasicvariables input gw 

n CHECK FOR COMMAND 

-^(1=A COMMANDS /GVVIN 
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Cl4] R CHECK VALIDITY OF INPUT. 

[15] ^{CHECKTRI IN) /GW IN 

[16] R SET V VECTOR 

[17] fl FIRST , SET THE TRUE VECTOR 

[18] GVVTRUE^INe. 0 2 

[19] fl THEN SET TEE FALSE VECTOR 
[2 0] GVVFALSE-rINe 1 2 

[21] fl COMBINE FOR THE V VECTOR 

[22] Z->r GVVT R UE , GVVF ALSE 
7 
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INPUT 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: argl INPUT arg2 


PURPOSE: To accept input from the user, check for 

the proper length, and coordinate command 
control. 


GLOBAL VARIABLES: COMMANDLIST, ECHOINPUT, IN. 


CALLING FUNCTIONS: GENERATEHMATRIX, GETB ASIC VARIABLES, 

GETNUMACC LE V, GETNUMBAS IC VAR lAE LES ^ 
GETNUMPHASES, GETNUMTRAJSETS , GETSTATES, 
GETFVECTOR, GETG^MATRICES , GETIVECTOR 
GETWALUES, METAPHOR. ~ " 


FUNCTIONS CALLED: PRINTQUAD, COMMANDA LTER. COMMANDBRIEF , 

COMMANDC A LC , COMMANDO OM , COMMANDDATA , 
COMMANDE C HO , COMMAMDE VA L , COMMANDHE LP . 


COMMENTS; 


Input from the user is accepted and placed 
in the variable IN, if the user has set 
ECHO ON, the input is repeated. This input 
IS checked to make sure it is of length 
a£gl. If not, an the input is then checked 
for a command. If a command is present, 
the proper COMMAND function is CALLED: 
AFTER THE COMMAND HAS BEEN EXECUTED, INPUT 
REPLACES IN WITH THE VALUE ’COMMAND' AND 
RET^NS. The value in ^ is an indicator 
calling function and is used by the 
HELP function. 


ill 

121 

[31 

C5] 

C6] 

C7] 

C8] 


LISTING: 

V SHAPE INPUT ROUTINE iCOMMANDVECTOR 

fl ROUTINE FOR INPUTTING ANSWERS 
COMMANDS. 

fi IF NUMERIC, DATA RETURNED IN 

'COMMAND^ RETURNED 

fl 

n GET INPUT 
ININilN^n 

fi ECHO INPUT IF DESIRED 
^i-ECHOINPUT) /INVECTORIZE 


INPUT CAN BE DATA OR 
ELSE IF COMMAND, 
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C9] \!\<-{{PRniTQUAD ^ \ PRIR T QU AD IR) 

CIO] PRIRT •» 

ai] n 

[12] fi CHARGE ALL SCALAR IRPUTS TO VECTORS 

[13] IRVECTORIZE : IR^ , IR 

[1M-] fl 

[15] fi CHECK FOR COMMARD ARD SET COMMARD VECTOR 

[16] COMMARDVECTOR^f^ /COMMARDLIST €IR 

[17] B 

[ 18 ] ft 

[19] fl EXECUTE COMMARD IF PRESERT 

[20] IRCOMMARD : •> ( COMMARD VECTOR ) /^HELP ,IREXIT , I^ATA , 

I^ALTER ylRCALC ^IRECHO ^IN BRIEF , I ROOM ^IREVAL 

[21] n ELSE CHECK THE SHAPE OF THE IRPUT . 'SHAPE^ IS ALWAYS AR 
IRTEGER SCALAR. IF GOOD, LEAVE. 

[22] ^{SHAPE=?IR) fO 

[23] ft OTHERWISE THE IRPUT WAS OF THE WRORG DIMERSIOR. PRIRT ERROR 
MESSAGE ARD TRY AGAIR . 

[24] ^*-{{PRX]jiTQUAD 'ERTER ' ) i {PRIRTQUAD SHAPE)\PRIRTQUAD ' 

ITEMS^) 

[25] ^^IR 

[26] ^0 

[27] ft 

[28] ft 

[29] ft HELP REQUESTED 

[30] INHELP iCOMMARDHELP ROUTINE 

[31] IR^' COMMAND' 

[32] ->0 
[ 33 ] ft 

[34] ft 

[35] ft END THE PROGRAM 

[36] IREXITt-^ 

[37] ft 

[38] ft 

[39] ft DISPLAY OF DATA REQUESTED 

[40] IRDATAiCOMMARDDATA 

[41] IN^' COMMAND' 

[42] ->0 

[43] ft 

[44] ft 

[45] ft CHARGE OF DATA REQUESTED 

[46] IRALTERxCOMMARDALTER 

[47] IR^' COMMAND' 

[48] -»-0 

[49] ft 
[50 ] ft 

[51] ft CALCULATION OF PERFORMABILITY REQUESTED 

[52] INCALC'. COMM ARDCALC 

[53] IN-^' COMMAND' 

[54] ^0 

[55] ft 

[56] ft SETTING OF THE ECHO SWITCH DESIRED 

[57] IRECHO ! COMMARDE CHO IR 
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[5 8] COMMAND^ 

[59] ^0 

[60] fl 

[61] fl COMMENT DESIRED 
C62] INCOMiCOMMANDCOM 

[63] IN-^ » COMMAND * 

[64] ->0 

[ 65 ] R , 

[66] n SETTING OF BRIEF SWITCH DESIRED 

[67] INBRIEF i COMM ANDBRIEF IN 

[68] IN^ » COMMAND ' 

[69] ^0 

[70] ft 

[71] ft PERFORMABILITY COMPUTATION DESIRED 

[72] INEVAL ; COMMANDEVAL 

[73] ->0 
V 
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CALLING SEQIJENCE: 
PURPOSE: 

GLOBAL VARIABLES; 
CALLING FUNCTIONS; 

FUNCTIONS CALLED; 

COMMENTS; 


INYES 

METAPHOR FUNCTION DESCRIPTION 
result INYES 


To determine whether a user has answered 
’YES' or 'NO' to a question. 


ECHOINPUT, IN. 


GDEDFAIL, GNFAIL, GAVINFO, GBVINFO, 

GDINFO, GDVINFO, GFVINFO, GGINFO, GGMINFO, 
, GHMINFO, GIVINFO, GNINFO, GNAINFO, 
GNBVINFO, GNPINFO, GNTSINFO, GPMINFO, 
GSINFO, GWINFO, MSTINFO. 


PRINT. 


Prints a prompt mimicking rne prompr 
associated' with the APL 'quad' input. If 
the user has set ECHO ON, the input is 
repeated. The input is then scanned for 
yes or no answers. Specifically, this is 
achieved by looking first fpr either a 'Y' 
or a somewhere in the input string. If 

either is found, the user is assumed to 
have answered 'YES-' if neither is found, 
the string is scanned for an 'N' or a '1'; 
if either is found, the user is .then 
assumed to have answered '-NO. ' If still 
none of these are found, the answer is 
considered ambiguous and the user Is asked 
to enter another answer. If the user 
answers 'YES,' INYES returns a 1 i!n 
result , else if 'NO,' a 0 is returned. 


7. 
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LISTING; 

7 Z*-INXESiIN 
[1] fl 

l2l fl ROUTINE ASKING YES AND NO ANSWERS. 1 RETURNED IF YE^ 
NO ^ , 

L31 fl 

n PRINT PROMPT AND GET ANSWER 
C5] lYIN ; PRINT »□;« 

C 6 3 IN^S!\ 

ill n ECHO THE INPUT IF DESIRED 
Cs3 -^i^ECHOINPUT) / lYSC AN 

C3 3 PRINT {no 

Cl03 n ASSUME YES HAS PRIORITY. LOOK FOR Y OR 1 
[113 lYSCANi ^ YO elN 

[12 3 IF N OR Q INPUT OR IF YES INPUT, EXIT 

[133 ^(Zvv/»i?0’ eJi7)/o 

[143 n ELSE TRY AGAIN 

[153 PRINT CENTER YES OR NO^ 

[16 3 -^lYIN 
7 


0 IF 
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METAPHOR 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; METAPHOR 


PURPOSE: The entry and main function for the 

METAPHOR software package. 


GLOBAL VARIABLES: MET, 


CALLING FUNCTIONS: None. 


FUNCTIONS CALLED: DECLAREMETAPHOR, INPUT, 


COMMENTS: Prints a heading identifying the package, 

version, and any current comments, 
additions, deletions, etc., regarding 
METAPHOR of which the user should be 
aware. METAPHOR then allows the user to 
input any commands which METAPHOR can 
support. METAPHOR continues in this 

command execution mode until an EXIT 

command is issued, causing the user to 
return to the APL command mode. 


LISTING: 

7 METAPHOR 

Ci: fl 

C23 n 
[3] fl 

fl PROGRAM FOR EVALUATION OF PERFORM ABILITIES 
L5 3 n 
[6 3 n 

[73 fl SET PROGRAM CONSTANTS 
[83 DECLAREMETAPUOR 
[93 fl 
[103 fl 

[113 n PRINT HEADING 
[12 3 PRINT » ' 

[133 PRINT ' ' 

[14-3 PRINT ^ ^CHIGAN ^ ALUA^ION AID FOR PERPHORM ABILITY^ 

[153 PRINT '' 

[163 PRINT » ' 

[173 PRINT »»' 

[18 3 PRINT » » 

[193 PRINT 'TYPE HELP FOR ASSISTANCE' 
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[20] ft PROGEAM LOOPS UNTIL EXIT TAKEN 

[21] MINt6 INPUT MET 

[ 22 ] -^^IN 

V 
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PRINT 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result PRINT arg 


PURPOSE: To print output from METAPHOR if the BRIEF 

ON command has not been issue^^ 


GLOBAL VARIABLES: BRIEFOUTPUT. 


CALLING FUNCTIONS; CHECKBIN, CHECKPOSI, CHECKPROB, CHECKTRI, 

GENERATEHMATRIX, GENERATEPMATRIX, 
GETACCLEVPROB, GETALTER VECTOR, 

GETBAS ICVARIABLES , GETDATA VECTOR , 
GETNUMACCLEV, GETNUMBASICVARIABLES, 
GETNUMPHASES, GETNUMTRAJSETS , GETSTATES, 
GETFVECTOR, GETGMATRICES , GETHMATRICES , 
GET^VECTOR, GETPMATRICES , GETWALUES , 
INYES, METAPHOR, PRINTQUAD, 
PRINTPERFORMABILITY, COMMANDALTER , 
COMMANDB RIEF , COMMANDDATA , COMMANDECHO, 
GDEDFAIL, GGIVEN, GNFAIL, GAVINFO, 

GBVINFO, ^INFO, GDVINFO, GFVINFO, GGINFO, 
GGM INFO, GHM INFO, GIVINFO, GNINFO, 

GNA INFO, GNBVINFO, GNPINFO, GNTSINFO, 
GPM INFO, ^INFO, GVVINFO, MET INFO. 

FUNCTIONS CALLED: NONE. 

COMMENTS: arg is ^ the string which METAPHOR desires 

to print, with a carriage return at the 
end of the line. PRINT returns that string 
in result if the user has not issued the 
BRIEF ON command, else, PRINT returns the 
null string. 


LISTING : 

? PRINT Q 
Cl] fl 
C2] n 

C3l n PRINTING ROUTINE FOR METAPHOR 
[4] (\ IF BRIEF*-! NO OUTPUT IS GIVEN 

C5 ] fl 

[6] a CHECK FOR TERSE INPUT FLAG 
C 7 ] -> ( BRIEFO UTPUT= 1 ) / 0 

C8] R FULL OUTPUT DESIRED, GIVE IT AND LEAVE 
[9] Z*-Q ■ ■ 

V 
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PR INT PERFORMAB I LI T Y 
METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; PRINTPERFORMABTLITY 


PURPOSE; To print the value of the performability 
once it is computed. 


GLOBAL VARIABLES: PERFORMABILITY. 

CALLING FUNCTIONS: EVAL 


FUNCTIONS CALLED: PRINT. 


COMMENTS; Prints the performability of the mission. 

If the performability does of the 
■ performability and the warning cannot be 
suppressed . 


LISTING: 

V PRINTPERFORM ABILITY 
Liz ft 

[2] ft ROUTINE FOR PRINTING THE PERFORMABILITY ONCE' IT IS 
CALCULATED 
C3] ft 
[4] PRINT 
C 5 ] PRINT ' » 

[ 6 ] PRINT ♦ » 

LIZ ^PERFORMABILITY FOR THIS MISSION ■*- ' iPERFORMABILITY 

[8 ] ft 

C93 n PRINT EARNING IF THE PERFORMABILITY DOES NOT SUM TO 
ONE, ELSE EXIT 

[10] /PERFORMABILITY) /O 

[11] ^ CAUTION . . .THE PERFORMABILITY SUMS TO ’;(+ 
/PERFORMABILITY) ^ NOT EQUAL TO ONE^ 

V 
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PRINT QUAD 

METAPHOR FUNCTION DESCRIPTION 


PURPOSE; 


CALLING SEQUENCE: 


To print output from METAPHOR if the BRIEF 
ON command has not been issued. No 
carriage return is appended to the output. 
result PRINTQUAD arg 


GLOBAL VARIABLES: BRIEFOUTPUT. 


CALLING FUNCTIONS: GETACC LE VPOB , GETNUMTRAJSETS , 

GETGMATRICES, GETHMATRICES , GETPMATRICES , 
GETWALUES, INPUT, COMMANDCALC , 
COMMANDC OM, COMMANDDATA, GDEDFAIL, GGIVEN 
GNFAIL. - - 


FUNCTIONS CALLED; None. 


COMMENTS; arg is part of a string METAPHOR desires 
to print with no carriage return after the 
printing. PRINTQUAD returns that string in 
result if the user has not issued the 
BRIEF ON command; else, METAPHOR 
the null string. 


LISTING: 

V Z^PRINTQUAD Q 
Cl3 ft 

C2J ft 

C3) ft PRINTING ROVTINE {NITH QUOTE QUADJ FOR 
[4] ft IF BRIEF-*-! NO OUTPUT IS GIVEN 
CS ] ft 

[6] ft CHECK FOR TERSE INPUT FLAG 

C7] '^{BRIEFOUTPUT-l) / PQBRIEF 

[8] ft FULL OUTPUT DESIRED, GIVE IT AND LEAVE 

C9] Z-*-Q 

CIO] 

Cll] ft ELSE RETURN THE EMPTY STRING 
Cl2] PQBRIEFi Z-*-' * 

V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES; 

CALLING PUMCTIOMS; 
FUNCTIONS CALLED: 

COMMENTS; 


COMMANDA LTER 

METAPHOR FUNCTION DESCRIPTION 
COMMANDALTER 


To execute the ALTER command by altering 
the data which the user specifies* 


DEFACCLEVEL, DEPBASICVARIABLES , DEFF, 
DEFG, DEPH, DEFI, DEFNUMACCLEV, 
DEFNUMTRAJSETS, DEFP, DEFV, 


INPUT. 


GETACCLEVPROB, GETALTERVECTOR, 
GETBASICVARIABLES, GETNUMACCLEV, 
GETMUMBASICVARIABLES, GETNUMTRA JSETS , 
GETFVECTOR, GETGMATRICES , GETHMATRICES , 
GETI VECTOR, GETPMATRICES , GET WA LUES, 
PRINT, ~ “ 


Calls GETALTERVECTOR to determine which 
values should be changed. ALTERVECTOR is a 
binary vector such that the position of 
the I’s and 0*s has the following code: 

Position 1 — ’Alter the P matrices. 

Position 2— Alter the H matrices. 

Index 3 Alter the time-invariant basic 
variables. 

Index 4-— Alter the values of all 

accomplishment levels. 


Index 5 — Alter the values of just the 
present accomplishment level. 

Index 6 — Alter the initial vector. 

Index 7 Alter the characteristic 

matrices. 


Index 8 — Alter the characteristic vector, 

Index^9 — Alter the character iza tion of the 
time— invar iant basic variables. 
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111 

L21 

[33 

[43 

[53 

[63 

[73 

[83 

[93 

[103 

[ 11 ] 

[123 

[133 

[143 

[15] 

[163 

[173 

[183 

[193 

[203 

[213 

[223 

[233 

[243 

[253 

[263 

[273 

[283 

[293 

[303 

[313 

[323 


Index 10 Alter the number of trajectory 
sets . 

For each alteration specified, 
COMMANDA LTER checks via the definition 
flags (e.g., DEFBASICVARIABLES ) that the 
corresponding value has been defined. 
Changed and calls the suitable functions 
to implement the change. When all requests 
have been processed, the function returns. 


LISTING: 

V COMMANDA LTERiALTERVECTON 

PI 

n ROUTINE FOR CHANGING CURRENT DATA 

PI 

fi GET DATA TO BE ALTERED 
ALTERVECTOR*-GETAL TEE V EC TO R 

Pi 


ft CHANGE THAT DATA. EXIT WHEN THROUGH. 
^OOPi-^ALTERVECTOR/ ^ ,^ASICV ARIABLES ^AALLACCLBVELS 

^PRESENTACCLEVEL ,AI ,AG ,AF »AV ,AN UMTRAJ SETS 
^0 — _ — — 


R 

R 

ft CHANGE THE REQUESTED DATA 

R 

ft CHANGE THE P MATRICES 
: -> ( DEFP= 1 ) /^A L TER 

fiP MATRICES ARE NOT DEFINED AT THIS TIME. PRINT ERROR 
MESSAGE ' 

PRINT ’P MATRICES ARE NOT DEFINED AT THIS TIME ♦ 
■^APLOOP 

^PA L TER ; PRIN T * AL TERING P ' 

GETmATRICES 
APLOOPi ALTERVECTORlll^Q 
■^ALOOP 

fl 

ft CHANGE P MATRICES 
Mi^{DEFH=l) / M ALTER 

ftP MATRICES ARE NOT DEFINED AT THIS TIME. PRINT ERROR 
MESSAGE 

PRINT »P MATRICES ARE NOT DEFINED AT THIS TIME ' 
■*ML00P 

MALTER’.PRINT * ALTERING P» 

GETHMATRICES 
MLOOPi ALTERVECTORl2'\-<-0 
-^^LOOP 
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C 33 ] R 

[34] R CHAUGE TEE TIME-i-IEV ARIAET BASIC VARIABLES 
[3 5] ABASICVARIABLES :->■(, 

DEFBASICVARIABLES=1) /^BASICVARIABLESALTER 

[36] nTIME+INVARIANT BASIC VARIABLES ARE NOT DEFINED AT THIS 
TIME. PRINT ERROR MESSAGE 

[37] PRINT 'TIME- INVARIANT BASIC VARIABLES ARE NOT DEFINED AT 
THIS TIME. ' 

[38] -^^BASICVARIABLESLOOP 

[39] MASICV ARIABLESALTERiPRINT 'ALTERING THE NUMBER OF BASIC 

VARIABLES' 

[ 40 ] GETNVUBASICV ARIABLES 

[41] GETBASICV ARIABLES 

[42 ] ABASICVARIABLESLOOP: ALTERV ECTORlZ >0 

[43] -^ALOOP 

[44] fl 

[45] R CHANGE ALL ACCOMPLISHMENT LEVELS 

[46] AALLACCLEVELSi^iDEFNUMACCLEV^D/AALLACCLEVELSALTER 

[47] fiTHE ACCOMPLISHMENT LEVELS ARE NOT DEFINED AT THIS 
TIME. PRINT ERROR MESSAGE 

[48] PRINT 'THE ACCOMPLISHMENT LEVELS ARE NOT DEFINED AT THIS 
.TIME. ' 

[49] -^MLLACC-LEVELSLOOP 

[50] AALLACCLEVELSALTER: PRINT 'ALTERING THE NUMBER OF 

ACCOMPLISHMENT LEVELS' 

[51] GETN UMACCL EV 

[52] GETACCLEVPROB 

[53 ] MLLACCLBVELSLOOPiALTERVECTORlhl^Q 
[ 54 ] ->-ALOOP 

[55] fl 

[56] R CHANGE JUST THE PRESENT {LAST) ACCOMPLISHMENT LEVEL 

[57] APRESENTACCLEVELi^{DEFACCLEVEL=l)/ APRESFNTACCLEVELALTER 

[58] R^^^ ACCOMPLISHMENT LEVEL IS NOT DEFINED AT THIS 
TIME. PRINT ERROR MESSAGE 

[59] PRINT 'AN ACCOMPLISHMENT LEVEL IS NOT DEFINED AT THIS 
TIME . ' 

[ 60 ] ->^RESENTACCLEVELLOOP 

[61] ^RESENTACCLEVELALTERiPRINT 'ALTERING THE PRESENT 

ACCOMPLISHMENT LEVEL' 

[62] PERFORM ABILITIlLl^GETACCLEVPROB L 

[ 63 ] ^RESENT ACCLEVELLOOPx ALTERV EC TORlZ'^-<^Z 
[64] -^ALOOP 
[65 ] fl 

[66] R CHANGE THE J VECTOR 

[67] AIi^{DEFI=l) / AIALTER 

[68] rJ VECTOR IS NOT DEFINED AT THIS TIME. PRINT ERROR 
MESSAGE 

[69] PRINT 'J VECTOR IS NOT DEFINED AT THIS TIME ' 

[70] ML OOP 

[71] M ALTER '.PRINT 'ALTERING THE I VECTOR' 

[72] J-<- GET^VEC TOR 

[73] MLOOP:ALTERVECTORZel-(-0 

[74] ^ALOOP 
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[75] n 

[76] n CHANGE THE G MATRICES 

[77] ^G:-^(DEFG=1)/AGALTBR 

[78] ftG MATRICES ARE NOT DEFINED AT THIS TIME. PRINT ERROR 
MESSAGE 

[79] PRINT 'G MATRICES ARE NOT DEFINED AT THIS TIME.' 

[80] -^±GLOOP 

[81] AGALTERiPRINT 'ALTERING THE G MATRICES' 

[82] G^GETGMATRICES 

[83] ^LOOPiALTERVECTORiry^O 

[84] ->~ALOOP 
[85 ] fl 

[86] n CHANGE THE F VECTOR 

[87] £Fi^iDEFF=l)/MALTER 

[88] fiF VECTOR IS NOT DEFINED AT THIS TIME. PRINT ERROR 
MESSAGE 

[89] PRINT ‘F VECTOR IS NOT DEFINED AT THIS TIME.' 

[90] -^AFLOOP 

[91] AFALTER: PRINT 'ALTERING THE F VECTOR' 

[92] F^GET^ECTOR 

[93] ^LOOPiALTERVECTORlBl-^O 

[94] -^ALOOP 

[95] n 

[96] R CHANGE THE TIME+INV ARIANT BASIC VARIABLE VECTOR 

[97] Mi^{DEFv^x)/ W alter 

[98] vtTHE TIME+INV ARIANT BASIC VARIABLE VECTOR IS NOT DEFINED 
AT THIS TIME. PRINT ERROR MESSAGE 

[99] PRINT 'THE TIME+INV ARIANT BASIC VARIABLE VECTOR IS NOT 
DEFINED AT THIS TIME.' 

[10 0] -+AVLOOP 

ilOllAV ALTER: PRINT 'ALTERING THE V VECTOR' 

[102] V+-CETVVALUES 
ZlOSlAVLOOP: ALTERVECTORl9l-+0 

[104] -+^LOOP 

[105] n 

[106] fl CHANGE THE NUMBER OF TRAJECTORY SETS BEING 
CONSIDERED 

[10 7 ] M UM TRAJ SETSi-+i DEFN UM TRAJSETS- 1 ) /M UMTRAJSETSA L TER 

[108] PiTHE NUMBER OF TRAJECTORY SETS IS NOT DEFINED , AT THIS 
TIME. PRINT ERROR MESSAGE. 

[109] PRINT 'THE NUMBER OF TRAJECTORY SETS IS NOT DEFINED AT 
THIS TIME. ' 

lllOl^UMTRAJSETSALTERiPRINT 'ALTERING THE NUMBER OF 
TRAJECTORY SETS' 

[111] NUMTRAJSETS+-GETNUMTRAJSETS 

[112] ALTERVECTORllO'^+'Q 

[113] -+ALOOP 
V 


‘7* COMM AN PA LTER METAPHOR FUNCTION DESCRIPTION 



122 


COMMAMDB RIEF 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: COMMANDB RIEF arg 

PURPOSE: To execute the BRIEF command by setting 

the BRIEF switch to arg. 

GLOBAL VARIABLES: BRIEFOUTPUT. 

CALLING FUNCTIONS: INPUT. 

FUNCTIONS CALLED: None. 


COMMENTS: The brief switch is set to the value of 

arg. Usually, this should 

^ t g . Usually, this should be either ON or 
OFF. A confirmation is also printed. 


[ 1 ] 

C2] 

C3] 

[ 4 ] 

C5] 

C6] 

C7] 

C8] 


LISTING: 

V COMMANDB RIEF SWITCH 
n 

fi ROUTINE FOR TURNING THE BRIEF SWITCH ON AND OFF ^ ON ^ 
CAUSES 

n METAPHOR TO USE A TERSE FORM OF OUTPUT, '^OFF' CAUSE THE 

NORMAL FULL OUTPUT, 


r' turn SWITCH ON IF REQUESTED , 
BRIEFO UTPUT-(-a /' ON ^ ^SWITCH 


ELSE TURN SWITCH OFF, 


R PRINT CONFIRMATION REGARDLESS OF BRIEF SWITCH 
'BRIEF ' I SWITCH 


V 
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COMMANDC ALC 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: COMMANDC ALC 


PURPOSE: To execute the CALC command by allowing 

the user to utilize the APL calculator 
mode. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: INPUT 


FUNCTIONS CALLED: None. 


COMMENTS: Prints a prompt sign ' and inputs the 

users equation. If the input is 


LISTING: 

7 COMMANDCALC iCCALCINFUT 
Cl] fl 

[2] n ROUTINE TO UTILIZE THE AFL CALCULATOR MODE FROM THE 
METAPHOR PACKAGE. 

C3J R HALTS WHEN THE INPUT IS NULL. 

14] n 

[5] CCALCI N '.\^^{PRINTQUAD 
C 6 ] U-^ CCALCI NPUT-^n 

p] LEAVE IE EXIT SPECIFIED. ELSE GET. NEXT CALCULATION 
CS] ■^{l-^/CCALCINPUT-EXIT) /Q ^ 

C 9 ] -^ CCALCI N 
V 
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COMMANDC OM 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: COHMANDCOM 


PURPOSE: To allow the user to enter a comment on 

the output. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: INPUT. 


FUNCTIONS CALLED: None. 


COMMENTS: Prints a prompt sign '***' and allows the 

user to print a comment on the same line. 
If the comment is empty, C0MMANDC OM exits; 
else the process is repeated. 


LISTING: 

V COHMANDCOM; COIN PUT 

[1] f=> 

[2] fl ROUTINE FOR ALLOWING THE USER TO PRINT A COMMENT 

C3l fi EACH COMMENT IS PRECEDED BY '***» AND THIS 

[4] fl HALTS WHEN THE INPUT IS NULL 

C5] ft 

[6 3 ft PRINT PROMPT SYMBOLS 
111 COIN : S^^iPRINTQUAD »***») 

[ 8 3 CCINPUT-^^ 

[9 3 fi IF COMMENT NOT EMPTY, GET NEXT COMMENT. ELSE LEAVE. 
[10 3 ■^i'i-a^^CCIN PUT) /COIN 

V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 

CALLING FUNCTIONS: 
FUNCTIONS CALLED: 
COMMENTS : 


COMHANDD ATA 

METAPHOR FUNCTION DESCRIPTION 
COMMANDDATA 


To execute the DATA command by displaying 
the data which the user specifies. 


DEFB ASIC VARIABLES, DEFF, DEFG, DEFH, DEFI, 
DEFNUMACCLEV, DEFNUMBASICVARIABLES , 
DEFNUMPHASES, DEFNUMSTATES , 

DEFNUMTRAJSETS, DEFP, DEFPERFORMABILITY, 
DEFV. 


INPUT. 


GETDATA VECTOR, PRINT, PRINTQUAD. 


Calls GETDATA VECTOR to determine which 
values should be displayed. DATA VECTOR is 
a binary vector such that the position of 
the I's and O's has the following code: 

Position 1 — Display the number of phases. 

Position 2 — Display the number of states 
in each phase. 

j 

Position 3 — Display the P matrices. 
Position 4 — Display the H matrices. 

I 

Position 5 — Display the number of time- 
invariant basic variables. 

Position 6 — Display the probabilities of 
each of the time-invariant basic 
variables. 

Position 7 — Display the number of 

accomplishment levels. 

Position 8 — Display the number of 

trajectory sets. 

Position 9 — Display the initial vector. 
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Position 10 — Display the characteristic 

matrices. 

Position 11 — Display the characteristic 
vector. 

Position 12 — Display the characterization 
of the time-invariant basic variables. 

Position 13 — Display the performability . 

For each display specified, COMMANDD ATA 
checks via the definition flags (e.g., 
DEFBASICVARIABLES ) that the corresponding 
value has been defined. Displayed and then 
displays the item. When all requests have 
been processed, the function returns. 


LISTING: 

V COMMAND!) ATAiDATAVECTOR 
111 fl 

[2] n ROUTINE FOR DISPLAYING CURRENT DATA 
C3] fl 

[4: n GET DATA TO BE DISPLAYED 

[5] DATAVECTOR^GETDATAVECTOR 
161 n 

[71 ft DISPLAY TEAT DATA. EXIT WHEN THROUGH. 

[8 3 DLOOP’.^DATAVECTOR/DNUMPHASES,DNUMSTATES,DP,DH ,DNU^BASICVAR 
^BASICVARIABLES ,DNUMACCLEV ,DN UMTRAJ SETS ,DI ,DG ,DF ,DV ,DPERF 
[9] ->0 

C 10 3 ft 
[11 3 n 

[123 ft SHOW THE REQUESTED INFORMATION 
[13 3 ft 

[14 3’ DNUMPHA SES ; ( DEFN UMPHA SES= 1 ) /M UMPHA SESO UT 
[153 PRINT ^NUMBER OF PHASES HAS NOT BEEN DEFINED* 

[163 ^DN UMPHASE SLOOP 

[173 DNUMPHASESOUTi\!\-^{{PRINTQUAD * NUMBER OF PHASES IS *)iPRINTQUAD 
NUMPH ASPS') 

[18 3 PRINT ' ’ 

[19 3 mUMPHASESLOOP\DATAYECTORl\l->-6 
[20 3 ->DL00P 

[21 3 ft 

[22 3 ^UMSTATES:^(.DEFNUMSTATES=1) / mUMSTATESOUT 
[23 3 PRINT ^NUMBER OF STATES HAS NOT BEEN DEFINED* 

[243 ^DNUMSTATESLOOP 

[25 3 ^UMSTATESOUTiE-^{(PRINTQUAD 'NUMBER OF STATES PER PHASE IS 
* ) ; PRINT QUAD ST A TESPERPHA SE ) 

[263 PRINT * * 
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[ 27 ] mUMSTATBSLOOP: DATAVECTORL-2 ]-*-0 

[28] ^DLOOP 

[29] n 

[30] ^i->-{PEFP=l) / ^OUT 

[31] PRINT '^MATRICES HAVE NOT BEEN DEFINED' 

[32] -^DPLOOP 

[33] ^OUTi PRINT 'THE P MATRICES ARE'. 

[34] P ~ 

[3 5] DPLOOP'.DATAVECTORlZ']^Q 

[36] -^DLOOP 

[37] fl 

[3 8] m'.^{DEFH = l)/mOUT 

[39] PRINT MATRICES SAVE NOT BEEN DEFINED' 

[40] -^DHLOOP 

[41] DHOUT: PRINT 'THE H MATRICES ARE:' 

[42] H ■ ~ 

[43] ^HLOOPiDATAVECTORli^li-^-Q 

[44] ->-DLOOP 

[45] 

[46] DNUMBASICV ARI ABIES: i 

DEFNVMBASICV ARIABLES=1) / mVMBASICV ARIABLESOUT 

[47] PRINT 'THE NUMBER OF BASIC V ARI ABIES HAS NOT BEEN DEFINED' 

[48] -^MUMBASICVARIABLESLOOP 

[49] mJUMBASICVARIABLESOUTi^^iiPRINTQUAD 'THE NUMBER OF TIME+ 

INVARIANT BASIC VARIABLES IS ' ) iPRINTQUAD NUMBASICVARIABLES) 

[50] PRINT " 

[ 51 ] DNUMBASICV ARIABLESLOOF: DATAVECTORlS ]-f-0 
[52] -^DLOOP 
[ 53 ] Pi 

[54] DBASICV ARIABLES:-^(DEFBASICV ARIABLES=1 ) / DBASICV ARIABLESOUT 

[55] PRINT 'THE TIME+INV ARIANT BASIC V ARIABLES HAVE NOT BEEN 
DEFINED' 

[56] -^DBASICV ARIABLESLOOF 

[57] DBASICV ARIABLESOUT'.PRINT 'THE TIME+INV ARIANT BASE VARIABLES 

SAVE PROBABILITIES:' 

[58] BASICV ARIABLES 

[ 59 ] ^BASICV ARIABLESLOOF: DATAVECIORl^ ]-^0 

[60] ^DLOOP 

[61] n~ 

[62 ] ^UMACCLEV :^{.DEFNUMACCLEV-\ ) / ^UMACCLEVOUT 

[63] PRINT 'THE NUMBER OF ACCOMPLISHMENT LEVELS NOT DEFINED' 

[64] -^mUM ACC LEV LOOP 

[65] m UM AC C LEV OUT {PRINT QUAD 'THE NUMBER OF ACCOMPLISHMENT 

LEVELS IS ') iPRINTQUAD NUMACCLEV) 

[ 66 ] PRINT " 

[ 67 ] DNUMACCLEVLOOP:DATAVECTORll'^-<-Q 
[ 68 ] -^^LOOP 
[63 ] fl 

[70] ^UMTRAJ SETS:-*-{DEFNUMTRAJ SETS~1 ) / DN UMTRAJ SETSOUT 

[71] PRINT 'THE NUMBER OF TRAJECTORY SETS NOT DEFINED' 

[ 72 ] UMTRAJ SET SL 00 P 

[73] MUMTRAJ SETSOUT '.PRINT 'THE NUMBER OF TRAJECTORY SETS IS'' 

[74] NUMTRAJSBTS 
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C 75 ] mUMTRAJSETSLOOPi DATAVECTORlBj^Q 

[76] -^^LOOP 

[77] n 

[78] ^h^{DEFI-l)/DIOVT 

[79] PRINT ‘J VECTOR NOT DEFINED' 

[80] -^DILOOP 

[81] DIOUT:[H^iiPRINTQUAD 'THE INITIAL VECTOR IS ' ) iPRINTQUAD I) 

[82] PRINT " 

[83] DILOOP: DATAVECT0RZ9l^0 

[84] -^DLOOP 

[85] , fl 

[86] DG:-^iDEFG=l)/DGOUT 

[87] PRINT 'G MATRICES NOT DEFINED'- 

[ 88 ] ->mLOOP 

[89] mOVT: PRINT 'THE G_ MATRICES ARE:' 

[90] G 

[91] mLOOP:DATAVECTORZlO']-<rO 

[92] ^DLOOP 
[93 ] R 

[94] j^:-^(.DEFF=l)/DF0UT 

[95] PRINT VECTOR NOT DEFINED' 

[96] ^DFLOOP 

[97] DFOUT:E^((PRINTQUAD 'THE FINAL VECTOR IS ')\PRINTQUAD F) 

[98] PRINT " 

[99] ^LO'OP:DATAVECTORllll^Q 

[ 100 ] -*^L00P 

[101] H 

[102 IDV :-^iDBFV=l) / DVOUT 

[103] PRINT 'THE TIME+ INV ARIANT BASIC VARIABLE VECTOR NOT DEFINED' 

[104] ^mLOOP 

llQZim OUT ‘.Z^^ZiPRINTQU AD 'THE TIME+INV ARIANT BASIC VARIABLE VECTOR 
IS ')%PRINTQUAD V) 

[106] PRINT " 

Zl011mLOOP:DATAVECTORll2'\^Q 

[108] -^DLOOP 

[109] fl 

LllO '}^PERF:^(.DEFPERFORMABILITI=l ) / DPERFOUT 

[111] PRINT ' PERFORM ABILITY NOT DEFINED' 

[ 112 ] -^^ERFLOOP 

ZllZli^ERFOUT:Z^-^(^ {PRINT QUAD 'THE PERFORM ABILITY IS ')%PRINTQUAD 
PERFORM ABILITY) 

[114 l^ERFLOOP: DATA VECTORll 3 ]^0 
[115] -^^LOOP 
7 
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CQMMAMDE CHO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: COMMANDE CHO arg 


PURPOSE:' To execute the ECHO command by setting the 
ECHO switch to arg. 


GLOBAL VARIABLES: ECHOINPUT. 


CALLING FUNCTIONS; INPUT. 


FUNCTIONS CALLED; None. 


COMMENTS: The echo switch is set to the value of 

arg. Usually, this should be either ON or 
OFF. A confirmation is also printed. 


LISTING; 

V COMMANDECHO B'l^ITCH 
Cl] fl 

[2] ft ROUTINE FOR TURNING THE ECHO SWITCH ON AND OFF, 'QN^ 
CAUSES 

[3] n METAPHOR TO REPEAT EVERY INPUT LINE. 'OFF' SUPPRESSES 

THE REPETITION . 

[4 ] n 

[5] fi TURN SWITCH ON IF REQUESTED, ELSE TURN SWITCH OFF. 

[6] ECHOINPUT-^f^/'ON'^SWITCH 
[73 'ECHO ' iSWITCH 

V 
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COMMANDE VAL 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: COMMANDEVAL 


PURPOSE:' To execute the 'EVAL' command by calling 
the proper functions to evaluate the 
user's performability model. 


GLOBAL VARIABLES: None, 


CALLING FUNCTIONS: INPUT. 


FUNCTIONS CALLED: GETBASICVARIABLES , GETNUMACCLEV, 

GETNUMBASIC VARIABLES, GETNUMPHASES , 
GETPERFORMABILITY, GETSTATES, 
GETHMATRICES, GETPMATRICES , 
PRINTPERFORM ABILITY. 


COMMENTS: Gets the number of phases in the finite 

phase model, the number of states in each 
of those phases, the intraphase state 
transition matrices, the interphase state 
transition matrices, the number of time- 
invariant basic variables, and the 
probabilities of those time— invariant 
basic variables. 


LISTING: 

V COMMANDEVAL 
Cl] ft 

C2] n PERFORMABILITY COMPUTATION PORTION OF METAPHOR 
C 3 ] fl — 

[4] fl FETCH THE MATRICES REQUIRED FOR PERFORMABILITY 
CALCULATIONS 
C 5 ] mN UMP : GETN UMPHA SE S 
C6] GET STATES 

C 7 ] GETPMATRICES 

C 8 ] GETmATRIC ES 

[9] GETNUMBASICVARIABLES 
CIO] GETBASICVARIABLES 
C 1 1 ] GETN UMACCL EV 
Cl2] fl 

Cl3] ft FOR EACH ACCOMPLISHMENT LEVEL, FETCH THE TRAJECTORY SETS 
AND CALCULATE THEIR PROBABILITIES 
C 1 4 ] GETPERFORM ABILITY 
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[ 15 ] Pi 

[16] fl PRINT THE RESULTING PERFORMABILITY 

[17] PRINTPERFORM ABILITY 
V 
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COMMANDH ELP 

METAPHOR FUNCTION DESCRIPTION 

CALLING SEQUENCE; COMMANDHELP a rg with the calling function 

indicated in arg. 


GLOBAL VARIABLES; None. 


CALLING FUNCTIONS; INPUT. 


FUNCTIONS CALLED; GAV INFO, GBVINFO, GDINFO, GDVINFO, 

GFVINFO, GGINFO, GGMINFO, , GHMINFO, 

GIVINFO, GNINFO, GNAINFO, GNBWNFO, 

GNPINFO, GNTSINFO, GPMINFO, GSINFO, 
GVVINFO, METINFO. 


r’DMMPM'Tf^: Each function in METAPHOR that asks a 

(non-yes/no) question has a number 
associated with it. .WHEN COMMANDHELP’ is 
typed in response to such a question, 
INPUT passes the number to COMMANDHELP for 
processing. COMMANDH ELP then chooses the 
proper INFO function and executes it. 


LISTING; 

V COMMANDHELP ROUTINE 

[23 fi ROUTINE PRINTING HELP INFORMATION 
[33 fl 

[43 fl GET THE PROPER INFO ROUTINE 
[53 -*{R0 UTINE= xNUMHSLPROUTINES) /HGNP , HGS ^HGPM ^ HGG 

H^,H^ , HGHM , HGNBV , HGB V . HGNA , HGIV~ 

HGGM , HGFV , HGVV , HGNTS ^HGAV ,HGDV ,HMET 
[6 3 n 

[7 3 R *GET NUMBER OF PHASES^ HELP 
[83 HGNP ; GNPINFO 
[93 ->0 

[103 n 

[113 n ^GET STATES^ HELP 
[123 HGS ; GSINFO 
[133 ->-0 

[143 n 

[153 n ^GENERATE P MATRIX^ HELP 
[163 HGPMi GPMINFO 
[173 -»-0 

[18 3 fl 

[19 3 ft 'GET GIVEN MATRIX' HELP 
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C20] EGG ; GGIIiFO 

[21] ^0 

[22] fl 

[23] fi ^ GET NFAIL MATRIX' HELP 

[24] EGN ; GNIEFO 

[2 5] -»-0 

[26] ft 

[27] ft ^GET FEDFAIL MATRIX' HELP 

[28] RGB ; GDIEFO 

[29] ^0 

[30] ft 

[31] ft ' GEEERATE MATRIX' HELP 
[3 2] gggjtf ; GHMIHFO 

[33] ^0 

[34] ft 

[35] ft 'GET NUMBER OF TIME+INV ARIANT BASIC VARIABLES' HELP 
[3 6] HGNBV xGNBVINFO 

[37] ^0 

[38] ft 

[3 9] ft 'GET TIME+INV ARIANT BASIC VARIABLES' HELP 

[40] HGBV ; GBVINFO 

[41] ->0 

[42] ft 

[43] ft 'GET NUMBER OF ACCOMPLISHMENT LEVELS' HELP 

[44] HGNA : GNAINFO 

[45] ->0 

[46] ft 

[47] ft 'GET J VECTOR' HELP 

[48] HGIV ; GIVINFO 

[49] -»-0 
[ 50 ] ft 

[51] ft ' GET MATRIX' HELP 

[52] HGGM ; GGMINFO 

[53] ^0 

[54] ft 

[55] ft 'GET F VECTOR' HELP 

[56] HGFV:GFVINF0 

[57] ^0 

[58] ft 

[5 9] ft 'GET V_ VECTOR' HELP 

[60] HGVV ; GVVINFO 

[61] ->0 

[62] ft 

[63] ft 'GET NUMBER OF TRAJECTORY SETS' HELP 

[64] HGNTS ; GNTSI NFO 

[65] *>0 

[66] ft 

[67] ft 'GET ALTER VECTOR VECTOR' HELP 

[68] HGAV '. GAVI N FO 

[69] ->0 

[70] ft 

[71] ft 'GET DATA VECTOR VECTOR' HELP 

[72] HGBV '.GBVINFO 


1 . COMMANBH ELP METAPHOR FUNCTION DESCRIPTION 



134 


[73] ^0 

[74] n 

[75] R ^METAPHOR' HELP 

[76] HMETi MET INFO 

[77] ->-0 
V 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES; 
CALLING FUNCTIONS: 
FUNCTIONS CALLED; 

COMMENTS: 


GDEDFAIL 

METAPHOR FUNCTION DESCRIPTION 
result <- GDEDFAIL arg 

To generate a DEDFAIL type matrix with 
shape arg * arg . 


IN, GD. 


GENERATE PMATR IX. 


ENCODE, INPUT, PRINT, PRINTQUAD. 


(See Section 4.1,1.) 

GDEDFAIL generates a state transition 
matrix assuming the matrix represents a 
system having arg components, each failing 
independently, each distinguishable, and 
each having the same failure rate. The 
failures are also assumed to be Poissop, 
and once a component has failed, it cannot 
become good again. The state of the system 
is the state of each of the components. 
The number of states declared for the 
phase must be a power of two. The 
resulting matrix will be arg x arg such that 
the (ifj)th entry will denote the 
probability that the system is' in state j 
at the end of the phase given it was in 
state i at the beginning of the phase. 

If the system has N components (and hence 
2**N states) , then the i-th row or column 
of the matrix represents the state 
determined as follows; take the binary 
representation of (2**N)-l-i. Each digit 
of the binary representation represents 
the state of a corresponding component in 
the system, 0 if failed, 1 if not failed. 
For example, consider a system with two 
components with the following transition 
matrix computed by GDEDFAIL; 
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11 

10 

01 

00 

11 

9. 98E-1 

9. 99E-4 

9.99E-4 

9.99E-7 

10 

0. OOEO 

9. 99E-1 

O.OOEO 

1. OOE-3 

01 

O.OOEO 

0. OOEO 

9.99E-1 

l.OOE-3 

00 

0. OOEO 

0, OOEO 

O.OOEO 

1. OOEO 


where 11 means that both components are 
not failed, 10 that the first component is 
not failed but the second one is, 01 that 
the first component is failed but the 
second is not, and 00 that both components 
are failed, 

GDEDFAIL is equivalent to GNFAIL when 
£NFAIL has arg' groups of 1 component each. 

GDEDFAIL first obtains the length of the 
phase from the user and checks it for 
positiveness. For the failure rate of the 
components; these are assumed to be equal. 
If this is not between the the fa.ilure 
rate is asked for again, while if 
confirmed, CTEDFAIL proceeds to compute 
the transition matrix. This is 
accomplished by examining each entry in 
the matrix, determining the number of 
transitions required fo.r the entry (take 
the binary representation of the (i,j)th 
entry as described above, subtract j 
from i component by component, and count 
the I’B — if. there is a 1 in j which does 
not appear in the corresponding position 
of i, then the transition is impossible 
and so the probability is 0) , and 
determining the probability of making 
those transitions. 

Once the matrix has been computed-, it is 
returned in result. 


LISTING: 

V Z-<-GDEVFAIL MiTi LAMED A; INDEX ; SIZE : SUCCESS i FAIL 

[13 fl ” 

[2] n ROUTINE FOR GENERATING TEE DEDFAIL TYPE P MATRIX 
[3 3 n TEE MATRIX IS TO EAVE SEAPE N-x-N 
[43 fi 

[5 3 fi CEECK TO MAKE SURE TSIS ROUTINE IS APPROPRIATE 
[6 3 ■»((2®iy) = r(2®i’/))/ggjff 

[73 R PRINT EXPLANATION i NOTE FAILURE ^ AND EXIT 
[83 PRINT 'THE NUMBER OF STATES IN DEDFAIL MUST BE A PONER OF 
TWO . » 
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'2’^X-S' HAS ')i{PRIJiTQUAD N) iPRINTQUAD 

. PRINT ♦ » 

Z-<r{N ^N) p~l 
■^0 
n 

n GBT PHASE LENGTH 
GDIN ; PRINT ^ ENTER PHASE LENGTH^ 

1 INPUT GD^ 

n CHECK COMMAND 

-^(1 = A €' COMMAND^ )/ GDIN 

R CHECK FOR POSITIVE NUMBER 

■*{IN>0) / GDSETT 

PRINT 'LENGTH IN TIME, MUST BE POSITIVE' 

^GDIN 


fl SET T TO PHASE LENGTH AND GET FAILURE RATE 
GDSETT’.T^IN 

GDINLiPRINT 'ENTER COMPONENT FAILURE RATE' 

1 INPUT G^ 
fl CHECK COMMAND 

->( 1=A 

e 'COMMAND' ) /GDIN L 


] fi CHECK FOR POSITIVE NUMBER 
] ■^iIN>0) / GDCHECKSIZE 

] Z?INL^^'^^ EAILURES per UNIT TIME. MUST BE POSITIVE' 

1 fl CHECK REASONABLENESS OF FAILURE RATE 
G^HECKSIZE {IN^IE 10) ^{IN<0 . 1)) / GDSETL 

I CORRECT 

[ -^(JjysrO .X)/GDLBIG 
I \H-^PRINTQUAD 'IS SMALL' 

\ ^GDLIESNOIN 

G^BIGi\]l-^PRINTQUAD 'IS LARGE' 

^ RATE, DO YOU WANT THIS 

■*i~INYES) / GDINL 

^SElf:LmZta OALCULATIOES 

PI 

R INITIALIZE THE P MATRIX 
Z-^-iN ,N) pO 

VECTOR FOR CALCULATING THE P MATRIX 
INDEX-^(^{ ( 2©i7) p2)ENC0DE(.N- \N) maxrix 

R 

R -LOOP THROUGH INDEX TO CREATE P- 
fl INITIALIZE LOOPS 
1^1 

fi DETERMINE THE NUMBER OF SUCCESS TRANSITION S 
^L OOP:SIZEi-+ /INDEXLl;2/INDEXlJi2 
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CS9] n FIND THE SUCCESS AND FAILURE PROBABILITIES 
C60] FAIL^{l-*-LAMBDA>^T)-i‘{{*/INDBXlIi'l)-SIZE) 

[61 3 SUCCESS-f-*-LAMBDAxT>iSIZE 

[62] ZZIiJ1^SUCCESSxFAILx{SIZE^+ 
/INDEXUi:i)x{w/INDEXLlil^INDEXlJ;l) 

[63] n INCREMENT COLUMN COUNTER AND BRANCH IF APPROPRIATE 

[64] J^J+1 

[65.] -^(.J<N) / GDLOOP 

[66] n RESET COLUMN COUNTER, INCREMENT ROW COUNTER AND BRANCH IF 
APPROPRIATE 

[67] J-^1 

[68] J-^J+1 

[69] -*{I<.N) /G^LOOP 
V 
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GGIVEN 

METAPHOR FUNCTION DESCRIPTION 

CALLING SEQUENCE: result argl GGIVEN arg2 

PURPOSE: To input a given argl x arg2 matrix from 

the user. 


GLOBAL VARIABLES: IN, GG . 


CALLING FUNCTIONS: GENERATEHMATRIX, GENERATEPMATRIX. 


FUNCTIONS CALLED: INPUT, PRINT, PRINTQUAD. 


COMMENTS: Prints a prompt to enter the matrix and a 

prompt for each row. Inputs each row of 
the matrix, checking that each row has 
arg2 elements. 


LISTING: 

V Z-(-Af GGIVEW N\ROW 
Cl] fl 

C2] n ROUTINE FOR INPUTTING CONSTANT MATRIX OF PROBABILITIES 

[3] n EACH ROW MUST SUM TO ONE. TEE MATRIX IS TO HAVE SHAPE 

M^N 

C4] fl 

[5] fl INITIALIZE THE MATRIX 

[6] Z^(Af,i7)pO 
C73 fl 

C8] fl INPUT AND CHECK THE MATRIX 

[9] PRINT 'ENTER THE MATRIX > 1 ROW AT A TIME' 

CIO] 

Cll] R INITIALIZE ROW COUNTER 
Cl 2] ROW^l 
[13] PRINT ' ' 

Cl4] GGIN'.m^i. {PRINTQUAU 'ROW ' ) liPRINTQUAD ROW) i PRINTQUAD ' -.' ) 

[15] PRINT ' ' 

[16] fl GET ROW DATA 

[17] N INPUT GG_ 

[18] R CHECK FOR COMMAND 
Cl9] ->-(l = A g 'COMMAND' ) / GGIN 

[20] R CHECK VALIDITY OF INPUT. FIRST CHECK FOR PROBABILITIES 

[21] -*(CHECKPROB IN) / GGIN 

[22] R CHECK THAT EACH ROW SUMS TO ONE. IF NOT^ ASK AGAIN. 

[23] ^( ( + /IN )-!)/ GGINSERT 

[24] PRINT 'THE SUM OF PROBABILITIES IN EACH ROW MUST BE 1' 
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C2S: -^GGIN 

1261 fl 

C2 7] fj INSERT TEE ROW INTO THE MATRIX 
[28] GGINSERTiZlROWil^IN 
C29] fl 

C30J fl INCREMENT ROW COUNTER AND BRANCH IF APPROPRIATE 
C3l3 ROW^ROW+1 

[32] ■*(.ROW<M) /GGIN 

[33] fi ELSE LEAVE 
V 
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GIDENTITY 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: result <- GIDENTITY arg 


PURPOSE: To generate an arg x arg identity matrix. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: GENERATEHMATRIX, GENERATEPMATRIX. 


FUNCTIONS CALLED: None. 


COMMENTS: Returns an arg x ar g identity matrix in 

result. 


LISTING: 

V Z^GIDEllTITY E 

[1] n “ 

[2] fl ROUTINE FOR GENERATING AN ffx// IDENTITY MATRIX 
C3] 

[43 n RETURN THE MATRIX 
C5] 2^(i^,if)p(l,(i7p0)) 

7 
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CALLING SEQUENCE: 
PURPOSE: 

GLOBAL VARIABLES: 
CALLING FUNCTIONS; 
FUNCTIONS CALLED: 
COMMENTS; 


GNFAIL 

METAPHOR FUNCTION DESCRIPTION 
result <- GNFAIL arg 

TO GENERATE A NFAIL TYPE MATRIX WITH SHAPE 
ARGXARG . 


IN, GN. 


GENERATE PMATR IX . 


ENCODE, INPUT, PRINT, PRINTQUAD. 


(See Section 4.1.2.) 

GNFAIL generates a state transition matrix 
assuming the matrix represents a system 
having M groups of K(m) components each, 
where K is a function of the group m. The 
components fail independently with the 
same failure rate and are assumed to have 
a Poisson distribution. Also, once a 
component has failed, it cannot become 
good again. The state of the system is the 
number of active (non— failed) components 
in each group. The number of states 
declared for the phase must be the product 
of (the number of components in each group 
plus one).. For example, if the system has 
3 groups containing respectively 2, 5, and 
7 components, then the phase has 
(2+l)*(5+l)*(7+l)=144 states. The number 
of states for the phase is contained in 
The resulting matrix will be argxarg 
in shape, such that the (i,j)th entry will 
give the probability that the system is in 
state j at the end of the phase given it 
was in state i at the beginning of the 
phase. 

If the system has M groups with K (m) 
components each, then the i-th row or 
column of the matrix represents the state 
determined as follows; take the number 
system such that the j-th digit is of base 
Kfj)+2, i.e., has maximum value k(j)+l. 
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This is similar to the APL ENCODE 
fREPRESENTATION] (T) function. Each digit 
of a number from the system denotes the 
state of the corresponding group, e.e., 
the number of active (non-failed) 
components in the group. The i-th row then 
represents (the maximum value of the 
system) +l-i. For example, consider a 
system with 2 groups, the first having 2 
components and the second 1 component, 
with the following transition matrix 
computed by GNPAIL: 



(2,1) 

(2,0) 

(1,1) 

(1,0) 

(0,1) 

O 

o 

(2,1) 

9, 704E-1 

9. 753E-3 

1. 951E-2 

1. 960E-4 

9. 802E-5 

9, 851E-7 

(2,0) 

0. OOOEO 

9. 802E-1 

0. OOOEO 

1.-970E-2 

0. OOOEO 

9. 901E-5 

(1,1) 

0, OOOEO 

0. OOOEO 

9. 802E-1 

9. 851E-3 

9.851E-3 

9. 901E-5 

(1,0) 

0. OOOEO 

0. OOOEO 

0. OOOEO 

9. 900E-1 

0. OOOEO 

9. 950E-3 

(Of 1) 

0. OOOEO 

. 0. OOOEO 

O’. OOOEO 

0. OOOEO 

9. 900E-1 

9. 950E-3 

(0,0) 

0. OOOEO 

0. OOOEO 

0. OOOEO 

0. OOOEO ■ 

0. OOOEO 

1. OOOEO 



where 

(2,1) 

means that 

group 1 

has two 


active components and group 2 has one 
active component, (2,0) means that group 1 
has^ two active components and group 2 no 
active components, and so forth. GNFAIL is 
equivalent to ^DEDFAIL when arg groups of 
one component each are specifTed. 


GNFAIL first obtains the length of the 
phase from the user and checks it for 
positiveness. For the failure rate of the 
components; these are assumed to be equal. 

this is not between the the failure 
rate^ is asked for again, while if 
confirmed, GNFAIL proceeds to obtain the 
number of groups and the number of states 
in each group. If the number of states 
given in arg does not equal the product of 
and the number of groups and number of 
states^ in each group is again adked for. 
This is accomplished by examining each 
entry in the matrix, determining the 
number of transitions required for the 
entry (take the representation of the 
(i,j)th entry as described above, subtract 
j from i component by component, and- sum 
the differences — if there is a a value in 
some position of j which is greater than 
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the value of the corresponding position of 
i, then the transition is impossible and 
so the probability is 0), and determining 
the probability of making those 
transitions . 

Once the matrix has been computed, it is 
returned in result. 


LISTING: 

V Z^GNFAIL NiTiLAMBDA%GROUPSiNUM%INDEX%IiJiCOEFFiFAILiSUCCESS 
Cl ] n 

C23 fl ROUTINE FOR GENERATING THE NFAIL TYPE P MATRIX 
C3] ft THE MATRIX IS TO HAVE SHAPE N>^N 
C4] ft 

C5] ft GET PHASE LENGTH 

C63 GN IN Ti PRINT ^ ENTER PHASE LENGTH' 

C7] 1 INPUT G^ 

CS] ft CHECK COMMAND 
C9] •>(1 = A e 'COMMAND ' ) / GNINT 

CIO] ft CHECK FOR POSITIVE NUMBER 
Cll] '^(.IN>0) / GNSETT 

Cl2] PRINT 'LENGTH IN TIME. MUST BE POSITIVE' 

Cl 3] ^GmNT 
Cl4] ft 

CIS] ft SET T TO PHASE LENGTH AND GET FAILURE RATE 
C 1 6 ] GNSETT ; T*-IN 

Cl 7] GN IN L‘. PRINT 'ENTER COMPONENT FAILURE RATE' 

CIS] 1 INPUT G^ 

Cl 9] ft CHECK COMMAND 
C20] ->(1=A 

€ 'COMMAND ' ) /GNINL 

C21] ft CHECK FOR POSITIVE NUMBER 
C22] •» ( Ji7> 0 ) / GN CHECKS I ZE 

C23] PRINT 'RATE IN FAILURES PER UNIT TIME. MUST BE POSITIVE' 

C24] -^GNINL 

C25] ft CHECK REASONABLENESS OF FAILURE RATE 
C26 ] GNCHECKSIZEi^(, ( Ji7>lS“l0 ) A ( . 1 ) ) / ONSET L 

C27] ft PRINT MESSAGE CHECK TO MAKE SURE~THE VALUE IS CORRECT 

C28] ^^PRINTQUAD IN 

C29] .D/GNLBIG 

C30] \B^PRINTQUAD 'IS SMALL' 

C 3 1 ] -yGNL YESNOIN 

C3 2] GNLBIG : \!i^PRINT0.UAD 'IS LARGE' 

C33] G^YESNOIN iPRINT * FOR A FAILURE RATE, DO YOU UANT THIS 
VALUE?' 

C34] ->{~IN YES) /GNINL 

C3S] ft ■ 

C36] ft SET LAMBDA TO FAILURE RATE AND GET NUMBER OF GROUPS 
C 3 7 ] GNSETL : LAMBDA-^IN 

C38] GNINGiPRINT 'ENTER NUMBER OF GROUPS' 

C39] 1 INPUT GN 
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[40] ft CHECK COMM AH D 

[41’] ->-(l=A COMMAND^ ) /^IHG 

[42] n CHECK FOR POSITIVE INTEGER 

[43] ^(CHECKPOSI IN)/GNING 

[44] PI 

[45] fl SET GROUPS TO HUMBER OF GROUPS AHD GET COMPONENTS PER 
GROUP 

[46] GROUP S^IH 

[47] GH INN ’.PRINT 'ENTER NUMBER OF COMPONENTS PER GROUP {SPACE 
BETWEEN EACH NUMBER ) : » 

[48] GROUPS INPUT ££ 

[49] ft CHECK COMMAND 

[50 ] -»■( 1 = A 

e 'COMMAND ' ) /GNINN 

[51] ft CHECK FOR POSITIVE INTEGER 

[52] -^{CHECKPOSI IN) /GNINN . . 

[53] ft CHECK FOR THE PROPER NUMBER OF STATES 

[54] -*{N=x /lN+1) /GNCALC 

[55] {PRINT QUAD 'THERE ARE ' ) \ {PRINTQUAD N) iPRINTQUAD » STATES 
IN THIS PHASE. THE PRODUCT OF lEACH COMPONENT') 

[56] PRINT " 

[57] PRINT 'NUMBER PLUS 1] MUST BE THE NUMBER OF STATES.' 

[58] PRINT 'HOW MANY GROUPS' 

[59] -^GNING 

[60] ft 

[61] ft SET HUM TO THE NUMBER OF POSITIONS FOR THE COMPONENTS IN 
THE GROUPS AND CALCULATE THE P MATRIX 

[62] GNCALCiNUM-^IN+1 

[63] ft 

[64] ft INITIALIZE THE P MATRIX 

[65] Z^(i7,i!?)p0 

[66] ft DETERMINE AN 'iNDEX VECTOR FOR CALCULATING THE P MATRIX 

[67] INDEX^^{NUM)ENCODE{N-\N) 

[71] ft 

[72] , ft LOOP THROUGH INDEX TO CREATE P 

[73] ft INITIALIZE LOOPS 

[74] 1^1 

[75] <7^1 

[76] ft FIRST DETERMINE THE PROPER COEFFICIENT FOR THE TERM UNDER 
CONSIDERATION 

[77] G^LOOP’. COEFF*-^ { INDEX [ .7 ; ] I INDEX [ J ; ] ) 

[78] ft MULTIPLY THE COEFFICIENT WITH THE PROPER EXPONENTIALS 

[79] FAIL’<^{ l-*-LAMBDA^T)*{+ / INDEXlI i'})-^ / INDEXlJ 

[80] SUCCESS^*-LAM3DA-x-T-x-{-i-/INDEXlJ\ ]) 

[81] ZlIiJl^^COEFF-xFAILy-SUCCESS 

[82] ft INCREMENT COLUMN COUNTER AND BRANCH IF APPROPRIATE 

[83] C7-J-+1 

[84] ->-{J:£N) /GNLOOP 

[85] ft RESET COLUMN COUNTER, INCREMENT ROW COUNTER AND BRANCH IF 
APPROPRIATE 

[86] <7^1 

[87] J-i-J+1 
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[88] /G^LOOP 

V 
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GAV INFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GAVINFO 


PURPOSE: To generate the GETALTERVECTOR HELP 

information. 


GLOBAL VARIABLES: None-. 


CALLING FUNCTIONS; COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS; Prints the information associated with the 
GETALTERVECTOR function. If the user 
wishes references, GAV INFO also prints a 
small selection of references. 


LISTING: 

V GAVISFO 

[1] ft 

[2] ft ROUTINE GIVING HELP ON CHOOSING THE DATA TO BE DISPLAYED 

[ 3 ] ft 

[4] PRINT ^ PLACE AN X BELOW EACH ENTRY IN THE GIVEN LIST WHICH YOU 
WANT TO » 

C5] PRINT ^CHANGE. THE ABBREVIATIONS ARE AS FOLLOWS:' 

[ 6 ] PRINT ' ' 

[7] PRINT ' ' p the INTRAPHASE STATE TRANSITION 

(P) MATRICES' 

C 8 ] PRINT ' ' 

[93 PRINT ' H THE INTERPHASE STATE TRANSITION 

(P) MATRICES' 

[103 PRINT ' ' 

[113 PRINT ’ CONST .BAS .VARS THE NUMBER OF TIME+ INVARIANT 

BASIC VARIABLES AND' 

[123 PRINT ' THEIR ASSOCIATED 

PROBABILITIES' 

[133 PRINT " 

[143 PRINT ' ALL .ACC .LEVELS USING THE PRESENT H AND P 

MATRICES AND THE' ” ” 

[153 PRINT ' PRESENT TIME- INV ARI ANT BASIC 

VARIABLE INFORMATION 

[163 PRINT ' DETERMINE THE PERFORM ABILITY OF 

THE SYSTEM . ' 

[173 PRINT ' METAPHOR WILL ASK FOR THE 
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CIS] 

C19] 

[ 20 ] 

[ 21 ] 

[ 22 ] 

[23] 

[24] 

[25] 

[26] 

[27] 

[28] 

[29] 

[30] 

[31] 

[32] 

[33] 

[34] 

[35] 

[36] 

[37] 

[38] 
[33] 
[40] 


[41] 

[42] 

[43] 

[44] 

[45] 

[46] 

[47] 

[48] 

[49] 

[50] 

[51] 

[52] 


APPROPRIATE IRFORMATIOR » 

PRINT » 

LEVELS. ’ 

PRINT ’» 

PRINT » PRESENT .ACC .LEVEL 
-LEVEL * 

PRINT ’ 

CONSIDERATION . » 

PRINT ” 

PRINT ’ I 

PRINT * ’ 

PRINT * G 

PRINT • » 

PRINT » F 

PRINT » 

OPERATION IS NOT EXECUTABLE .) 
PRINT * » 

PRINT » V 

INVARIANT BASIC VARIABLES' 
PRINT ' » 

PRI NT ' NUM. TRA J . SETS 

SETS DESCRIBING' 

PRINT ' 

CONSIDERATION ' 

PRINT " 

PRINT 'IF AN ITEM IS UNDEFINED 
REQUESTED, AN ERROR ' 

PRINT 'MESSAGE WILL BE PRINTED 
SUPPRESED . MORE THAN ' 

PRINT 'ONE ITEM MAY BE CHANGED 
COMMAND . ' 

PRINT 'EXAMPLE'. ' 

PRINT " 

PRINT 

'P H CONST .BAS .VARS ALL. ACC 
V NUM .TRAJ .SETS' 

PRINT 'X X 

PRINT " 


REGARDING THE ACCOMPLISHMENT 

ALTER ONLY TEE ACCOMPLISHMENT 
PRESENTLY UNDER 

INITIAL VECTOR' 

CHARACTERISTIC MATRICES' 

CHARACTERISTIC VECTOR' 

{AT PRESENT, THIS ALTER 

VECTOR CHARACTERIZING THE TIME+ 

ALTER THE NUMBER OF TRAJECTORY 
THE ACCOMPLISHMENT LEVEL UNDER 

WHEN AN ALTERATION IS 
AND THAT ALTERATION 
WITH A SINGLE ALTER 

LEVELS PRESENT .ACC .LEVEL I G 

X » 


PRINT 'THIS INFORMS METAPHOR THAT THE P AND H MATRICES ARE TO 
BE CHANGED AND THAT THE ' ~ ~ 

PRINT 'PERFORM ABILITY IS TO BE CALCULATED . IF YOU WISH TO 
CHANGE THE NUMBER OF PHASES ' 

STATES, TYPE END AND BEGIN METAPHOR 

AG AIN ' 

PRINT »» 

PRINT 'DO YOU WANT REFERENCES?' 
fl LEAVE IF NOT 
■*{~INYES) /Q 

PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
ANALYSIS, SEE' muv 

PRINT " 

PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
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E53] print ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS " NASA 
GRANT ' 

[55] PR^Vt STATUS REPORT NO. 3, NOVEMBER 1977.’ 

p6] PRINT ^FOR FURTHER INFORMATION REGARDING METAPHOR^ SEE' 

[57] PRINT ” 

[58] PRINT ’ J. F. MEYER ^ "MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

[59] * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS^'' NASA 

[60] PRINT ’ NSG 1'306 , STATUS REPORT NO. 4. JULY 1978 ’ 

[61] PRINT ” 

[62] PRINT 'FOR FURTHER INFORMATION REGARDING APL . SEE' 

[63] PRINT " 

[64] PRINT ' S. PAKIN, " APL\ZQQ REFERENCE MANUAL ' ' SCIENCE 
RESEARCH' 

[65] PRINT ' ASSOCIATES, IMC . , CHICAGO, 1972.’ 

[66] PRINT " 
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GBV IMFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; GBVINFO 


PURPOSE: To generate the GETBASICVARIABLES HELP 

info rmation. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETBASICVARIABLES function. If the user 
wishes references/ GBV INFO also prints a 
small selection of references. 


LISTING; 

V GBVINFO 
Cl] ft 

C2] fl ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF BASIC 
VARIABLES 

C3] fl 

C4] PRINT 'ENTER THE PROBABILITIES OF THE BASIC VARIABLES WHOSE 
PROBABILITIES REMAIN CONSTANT' 

[5] PRINT 'THROUGHOUT THE MISSION INTERVAL (J.F., THE NUMBER OF 
TIME- INV ARI ANT BASIC VARIABLES.)' 

C6] PRINT 'THE PROBABILITIES SHOULD BE ENTERED AS A ROW OF 
POSITIVE NUMBERS' 

111 PRINT 'BETWEEN ZERO AND ONE, INCLUSIVE . THE NUMBERS SHOULD 
BE ' 

[8] PRINT 'SEPARATED BY SPACES ANDi-OR COMMAS. THE ORDER OF THE 
NUMBERS SHOULD' 

C9] PRINT 'CORRESPOND TO THE ORDER OF THE TIME+INV ARIANT BASIC 
VARIABLE VECTORS' 

ClO] PRINT 'WHICH WILL BE ASKED FOR LATER.' 

Cll] PRINT ' EX AMPLE t' 

[12] PRINT ' .2, 0.3 .4,0. 1» 

[13] PRINT 'THIS INFORMS METAPHOR THAT THE PROBABILITTF.S OP TPP. 
FOUR TIME+INV ARIANT' 

[14] PRINT 'BASIC VARIABLES ARE 0.2, 0.3, 0.4, AND 0.1 
RESPECTIVELY . THE NUMBER' 

[15] PRINT 'OF TIME- INV ARIANT VARIABLES DECLARED EARLIER MUST HAVE 
BEEN FOUR OR AN' 


metaphor {VERSION 1) PROGRAMMER'S GUIDE 



151 


[16] PRINT 'ERROR MESSAGE WILL RESULT,' 

[17] PRINT 

[18] PRINT 'DO YOU WANT REFERENCES-?' 

[19] fl LEAVE IF NOT 

[ 20 ] 

[21] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[22] PRINT " 

[23] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE • 

[24] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[25] PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.’ 

[26] PRINT ' ' 

[27] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[28] PRINT ' ' 

[29] PRINT ’ J. F. MEYER, "MODELS AND TECHNIQUES FOE EVALUATING 
THE ' 

[30] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT' 

[31] PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 .’' 

[32] PRINT " 

[33] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[34] PRINT " 

[35] PRINT ' S. PAKIN , "APL\3S0 REFERENCE MANUAL , " SCIENCE 
RESEARCH' 

[36] PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.' 

[37] PRINT ' ' 

V 
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CALLING SEQUENCE; 

PURPOSE; 
GLOBAL VARIABLES; 
CALLING FUNCTIONS; 
FUNCTIONS CALLED; 


GDINFO 

METAPHOR FUNCTION DESCRIPTION 
GDINFO 

To generate the GDEDFAIL HELP information. 
None . 

COMMANDH ELP. 

IN YES, PRINT. 


COMMENTS; Prints the information associated with the 
GDEDFAIL function.- If the user wishes 
references, GDINFO also prints a small 
selection of references. 


LISTING; 

V GDINFO 

m ft 

[2] R GIVING HELP ON DEDFAIL TYPE P MATRIX 

[3 ] fl 

[4] PRINT ^ METAPHOR WILL GENERATE A P MATRIX ASSUMING THE MATRIX 

REPRESENTS * 

[5] PRINT M SYSTEM HAVING N COMPONENTS , EACH FAILING 
INDEPENDENTLY AND EACH ' 

[6] PRINT * DISTINGUISHABLE. THE FAILURES ARE ALSO ASSUMED TO BE 

f 

[7] PRINT ^POISSON, AND ONCE A COMPONENT HAS FAILED^ IT CANNOT^ 

[8] PRINT ^BECOME GOOD AGAIN.'' 

C9] PRINT ^THE STATE OF THE SYSTEM IS THE STATE OF EACH OF' 

[10] PRINT 'THE COMPONENTS . THE NUMBER OF STATES DECLARED FOR THE 
PHASE MUST BE ' 

[11] PRINT 'A POWER OF TWO. YOU WILL BE ASKED THE LENGTH OF THE 
PHASE I ENTER A' 

[12] PRINT 'SINGLE POSITIVE INTEGER. NEXT YOU WILL BE PROMPTED FOR 
THE FAILURE' 

[13] PRINT 'RATE OF THE COMPONENTS . AGAIN ENTER A SINGLE POSITIVE 
NUMBER. IF ' 

[14] PRINT 'THIS NUMBER IS NOT BETWEEN IE 1 AND IE 10, YOU WILL BE 
ASKED FOR CONFIRMATION . ' 

[15] PRINT ' ' 

[16] PRINT 'DO YOU WANT REFERENCES?' 

[17] n LEAVE IF NOT 

[18] ->-{~INYES) fO 
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C19] 

Z201 

1211 

[ 22 ] 

[23] 

[24] 

[25] 

[26] 

[27] 

[28] 

[29] 

[30] 

[31] 

[32] 

[33] 

[34] 

[35] 


PRINT *FOR FURTHER INFORMATION ON PERFORM ABILITI MODELING AND 
ANALYSIS, SEE^ 

PRINT » » 

PRINT » J. F. MEYER, ^ ^MODELS AND TECHNIQUES FOR EVALUATING 
THE » 

PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,'^ NASA 
GRANT ' 

PRINT ’ NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977, » 

PRINT »• 

PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

PRINT ' ' 

PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT ' 

PRINT ' NSG 1306, STATUS REPORT NO, 4, JULY 1978.* 

PRINT ' ' 

PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

PRINT ** 

PRINT ' S. PAKIN , "APL\360 REFERENCE MANUAL," SCIENCE 
RESEARCH' 

PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.’ 

PRINT ' ' 

V 
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GDV IMFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; GDVINFO ■ 


PURPOSE: To generate the GETDATA VECTOR HELP 

information. 


GLOBAL VARIABLES; None. 


CALLING FUNCTIONS; COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETDATA VECTOR function. If the user wishes 
•references, GDVI NFO also prints a small 
selection of references. 


LISTING: 

V GDVINFO 
Cl] ft 

C2] ft ROUTINE GIVING HELP ON CHOOSING THE DATA TO BE ALTERED 
C3] ft 

C4] PRINT CENTER AN X BELOW EACH ITEM IN THE GIVEN LIST WHICH YOU 
WANT TO » 

[5] PRINT ^DISPLAY, THE ABBREVIATIONS ARE AS FOLLOWS'.' 

[6] PRINT " 

111 PRINT * NUM .PHASES THE NUMBER OF PHASES' 

C 8 3 PRINT ' ' 

[9] PRINT ' NUM .STATES THE NUMBER OF STATES' 

CIO] PRINT " 

Cll] PRINT ' p the INTRAPHASE TRANSITION (P) 

MATRICES' - 

C12] PRINT " 

Cl3] PRINT ' NUM. CONST .BAS .VARS THE NUMBER OF TIME'' INV ARI ANT 
BASIC VARIABLES' 

Cl4] PRINT " 

C15] PRINT 'PROB .CONST .BAS. VARS THE PROBABILITIES OF EACH OF 
THE TIME- INVARIANT' 

C16] PRINT ' BASIC VARIABLES' 

Cl 7] PRINT " 

CIS] PRINT ' NUM .ACC .LEVELS THE NUMBER OF ACCOMPLISHMENT 

LEVELS' 

Cl9] PRINT " 

C20] PRINT ' NUM. TRAJ .SETS THE NUMBER OF TRAJECTORY SETS 
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[211 

[221 

[231 

[2i+l 

[ 25 ] 

[261 

[271 

[281 

[291 

[301 

[311 

[321 

[331 

[341 

[351 

[361 

[371 

[381 

[391 

[401 

[411 

[421 

[431 

[ 44 ] 

[ 45 ] 
[461 


[ 47 ] 

[ 48 '] 

[ 49 ] 

[ 50 ] 

[ 51 ] 

[ 52 ] 

[ 53 ] 
[543 
[ 55 ] 

[561 

[ 57 ] 


ASSOCIATED WITH' 
PRINT ' 

CONSIDERATION' 
PRINT ' ' 


TEE ACCOMPLISHMENT LEVEL UNDER 

PRINT ' 

TRAJECTORY SET' 
PRINT ' 

PRINT ' ' 

I 

THE INITIAL VECTOR FOR THE 
UNDER CONSIDERATION' 

PRINT ' 

THE TRAJECTORY' 
PRINT ' 

PRINT ' ' 

G 

THE CHARACTERISTIC MATRICES FOR 
SET UNDER CONSIDERATION' 

PRINT ' 

THE TRAJECTORY' 
PRINT ' 

PRINT " 

F 

THE CHARACTERISTIC VECTOR FOR 
SET UNDER CONSIDERATION' 

PRINT ' 

TIME+ INVARIANT ' 
PRINT ' 

TRAJECTORY SET ' 
PRINT ' 

PRINT ' ' 

V 

TEE VECTOR CHARACTERIZING THE 
BASIC VARIABLES FOR THE 
UNDER CONSIDERATION' 

PRINT ' 
PRINT ' ' 

PERF 

THE PERFORM ABILITY' 


PRINT 'IF AN ITEM IS UNREFINED WHEN A DISPLAY IS REQUESTED, AN 
ERROR MESSAGE' 

PRINT 'WILL BE PRINTED AND TEAT DISPLAY WILL BE 
SUPPRESED . MORE THAN ONE ITEM ' 

PRINT 'MAY BE DISPLAYED WITH A SINGLE DATA COMMAND.' 

PRINT 'EXAMPLE'.' 

PRINT ' > 

PRINT 

'NUM. PHASES NUM. STATES P H NUM .CONST .BAS .V ARS PROB .CONST .B 
PRINT 'X 

X X 

PRINT 'NUM .ACC .LEVELS NUM .TRAJ .SETS I G F V FERF' 

PRINT 

'XX X 

t 

PRI^IT ’ » 

PRINT 'THIS INFORMS METAPHOR THAT THE NUMBER OF PHASES, 

STATES, AND ACCOMPLISHMENT' 

PRINT 'LEVELS AS WELL AS THE PROBABILITIES OF THE TIME+ 
INVARIANT BASIC VARIABLES' 

PRINT 'AND THE PERFORM ABILITY ARE TO BE DISPLAYED .' 

PRINT ' ' 

PRINT 'DO YOU WANT REFERENCES?' 
n LEAVE IF NOT 
-'■{'-INYES) /O 

PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

PRINT ' '■ 

PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
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THE • 

[58] PRINT » EFPEC.TIVENESS OF AIRCRAFT COMPUTING SYSTEMS ^ NASA 
GRANT » 

[59] PRINT » NSG 1306, STATUS REPORT NO, 3, NOVEMBER 1977. » 

[60] PRINT '» 

[61] PRINT ^FOR FURTHER INFORMATION REGARDING METAPHOR^ SEE* 

[62] PRINT »» 

[63] PRINT » J, F. MEYER, **MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[64] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ** NASA 
GRANT*- 

[65] PRINT * NSG 1306, STATUS REPORT NO, 4, JULY 1978.* 

[66] PRINT ** 

[67] PRINT *FOR FURTHER INFORMATION REGARDING APL , SEE* 

[68] PRINT ** 

[69] PRINT * S, PAKIN, *’i4Pi:\360 REFERENCE MANUAL ,* * SCIENCE 
RESEARCH* 

[70] PRINT * ASSOCIATES , INC , , CHICAGO, 1972.* 

[71] PRINT * * 
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GFV IMFO 

METAPHOR FlINCTIOM DESCRIPTION 
CALLING SEQUENCE: GFVINFO 


PURPOSE: To generate the GETFVECTOR HELP 

information. ~ 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETF^VECTOR function. If the user wishes 
references, GFV INFO also prints a small 
selection of references. 


LISTING; 

7 GFVINFO 

Cl] fl 

C2] fl ROUTINE GIVING HELP ON INPUTTING THE F VECTORS 
C3 ] n 

C4T PRINT 'ENTER THE CHARACTERISTIC (F) VECTOR FOR THE TRAJECTORY 
SET UNDER CONSIDERATION . » “ 

C5] PRINT 'EACH ENTRY SHOULD BE EITHER 0 OR 1 AND SHOULD BE 
SEPARATED FROM THE OTHER ENTRIES ' 

C6] PRINT 'BY SPACES AND/OR COMMAS. 'THE NUMBER OF ENTRIES SHOULD 
BE THE SAME AS THE NUMBER' 

C7] PRINT 'OF STATES OF THE FINAL PHASE MODEL. ALSO THE ORDER OF 
THE ENTRIES SHOULD' 

[8] PRINT 'CORRESPOND TO THE ORDER OF THE STATES AS CONSIDERED 
ELSEWHERE IN THE' 

[9] PRINT ' METAPHOR PACKAGE FOR THE FINAL PHASE ' 

CIO] PRINT 'EXAMPLE'.' 

Cll] PRINT ' 1 0, 1 ,0* 

Cl2] PRINT 'THIS INFORMS METAPHOR THAT THE CHARACTERISTIC VECTOR 
FOR THIS TRAJECTORY ' 

Cl 3] PRINT 'SET IS' 

Cl4] PRINT ' 1’ 

CIS] PRINT ' 0’ 

Cl6] PRINT ' 1' 

C 1 7 ] PRINT ' 0 . » 

CIS] PRINT ' ' 

Cl9] PRINT 'DO YOU WANT REFERENCES?' 
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[20] ft LEAVE IF NOT 

[21] -^i-INYES) /O 

[22] PRINT *FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE* 

[23] PRINT »» 

[24] PRINT » J, F. MEYER, *' MODELS AND TECHNIQUES FOR EVALUATING 
THE » 

[2 5] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ,* * NASA 
GRANT* 

[26] PRINT * NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977. » 

[27] PRINT * * 

[28] PRINT *FOR FURTHER INFORMATION REGARDING METAPHOR, SEE* 

[2 9] PRINT ** 

[30] PRINT ’ J. F. MEYER, ** MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

[31] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,** NASA 
GRANT* 

[32] PRINT * NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

[33] PRINT ** 

[34] PRINT *FOR FURTHER INFORMATION REGARDING APL , SEE* 

[35] PRINT ** 

[36] PRINT * S. PAKIN , * * APL\Z&Q REFERENCE MANUAL ,* * SCIENCE 
RESEARCH * 

[37] PRINT * ASSOCIATES , INC . , CHICAGO, 1972.' 

[38] PRINT * * 

V 
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GGINFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; GGINFO 

PURPOSE; To generate the GGIVEN HELP information. 

GLOBAL VARIABLES; None. 

CALLING FUNCTIONS; COMMANDH ELP. 

FUNCTIONS CALLED; INYES, PRINT. 


COMMENTS; Prints the information associated with the 
GGIVEN function. If the user wishes 
references, GGINFO also prints a small 
selection of references. 


cn 

£21 

C3] 

[4] 

C5l 

[ 6 ] 

£71 

£81 

£81 

CIO] 

Cii] 

C12] 

Cl3] 

C14] 

CIS] 

C16] 

Cl7] 

Cl8] 

C19] 

C20] 


LISTING; 

V GGINFO 

fi ROUTINE GIVING HELP ON INPUTTING GIVEN P MATRICES 

AN M-<N ARRAY ^ ONE ROW AT A TIME. EACH ENTRY 

MUST ' 


mW^MUS^T ° ^ and tee entries of EACH 

IVaIIs"aId%r'' ^ series of n numbers with 

PRINT ^COMMAS BETWEEN EACH.' 

PRINT 'EXAMPLE-.' 

PRINT ' .25 0.5..1 0.15’ 

PRINT 'HERE, THE MATRIX HAS FOUR ENTRIES PER ROW.' 

PRINT ’ ’ 

PRINT 'DO YOU WANT REFERENCES?' 
fl LEAVE IF NOT 
H-INYES) /O 

T/aI^Ys7s^,^ SeT''^^^^ ON PERFORM ABILITY MODELING AND 

PRINT ' ' * 


PRINT ' 
THE ' 


J. F. MEYER, "MODELS AND TECHNIQUES FOE EVALUATING 


PRINT ' 
GRANT' 
PRINT • 
PRINT ' ' 


EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977,’ 
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C21] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

C22] PRINT »• 

C23] PRINT ' J, F. MEIER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[243 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[25] PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

[26] PRINT ' ' 

[27] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[28] PRINT ' ' 

[29] PRINT ' S, PAKIN, " APL\ZSQ REFERENCE MANUAL ," SCIENCE 
RESEARCH ' 

[30] PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.' 

[31] PRINT " 
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GGM INFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GGMINFO 


PURPOSE: 


To generate the GETGMATRICES HELP 
information. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS; COMMANDH ELP. 

FUNCTIONS CALLED: INYES , PRINT. 


COMMENTS: Prints the information associated with the 

GETGMATRICES function.. If the user wishes 
references, GGMINFO also prints a small 
selection of references. 


Cl] 

[ 2 ] 

C3] 

[ 4 ] 

C5] 

C6] 

C7] 

[ 8 ] 

[9] 

C103 

[ 11 ] 

C12] 

[13] 

[14] 

[15] 

[16] 

[17] 

[18] 
[19] 


LISTING; 

V GGMI NFO 

Pi 

n ROUTINE GIVING HELP ON INPUTTING G MATRICES 
n 


PRINT 'ENTER THE DIAGONAL OF THE CHARACTERISTIC {G) MATRIX FOR 
THE PHASE UNDER CONSIDERATION 

PRINT 'EACH ENTRY SHOULD BE EITHER 0 OR 1 AND SHOULD BE 
SEPARATED FROM THE OTHER ’ 

PRINT 'ENTRIES BY SPACES AND { OR COMMAS, THE NUMBER OF ENTRIES 
SHOULD BE THE SAME' 

PRINT 'AS THE NUMBER OF STATES FOR THE PHASE. ALSO THE ORDER 
OF THE ENTRIES SHOULD' 

PRINT 'CORRESPOND TO THE ORDER OF THE STATES AS CONSIDERED 
ELSEWHERE WITHIN THE' 

PRINT ' METAPHOR PACKAGE FOR THE PEASE.' 

PRINT 'EXAMPLE'.' 

PRINT ' 0 0,1,1 1 ’ 

PRINT- 'THIS INFORMS METAPHOR THAT THE CHARACTERISTIC MATRIX 
FOR THIS PHASE IS' 

O' 

O' 

O' 

O' 

1 


PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 

PRINT 'DO YOU WANT REFERENCES?' 


t 

t 

t 

f 

T 

f I 


0 

0 

0 

0 

0 
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Z20l fl LEAVE IE NOT 

H21] ’^{'•'INYES') /Q 

[223 PRINT *FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
ANALYSIS, SEE^ 

[23] PRINT »» 

[243 PRINT ' J. F, MEYER, MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

[253 PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 

GRANT ' 

[263 PRINT * NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977 » 

[273 PRINT ’ » 

[283 PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR SEE' 

[293 PRINT " 

[303 PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[31 3 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 

GRANT' 

[323 PRINT ' NSG 1306. STATUS REPORT NO. 4, JULY 1978 • 

[333 PRINT " 

[343 PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[353 PRINT " 

[363 PRINT ' S. PAKIN, " APL\ZB0 REFERENCE MANUAL SCIENCE 
RESEARCH ' 

[373 PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.' 

[383 PRINT " 

V 
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GHMINFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GHM INFO 

PURPOSE; To generate the GETHMATRICES HELP 
info rmation. 

GLOBAL VARIABLES; None. 

CALLING FUNCTIONS: COMMANDH ELP.. 

FUNCTIONS CALLED: INYES, PRINT. 

COMMENTS; Prints the information associated with the 

GETIIMATRICES function. If the user wishes 
references,. GHMI NFO also prints a small 
selection of references. 


ill 

121 

C33 

C43 

C5] 

C6] 

I7l 

C8J 

C9] 

ClOl 

Cii3 

C12] 

C133 

tl43 

C153 

C16] 

C173 

C183 

C193 

C203 


LISTING: 

? GHMINFO 

ft ROUTINE GIVING HELP ON INPUTTING GIVEN H MATRICES 

9i 


PRINT ’•TIPS ONE OFi GIVEN, lUENTIfl^ 
PRINT *DO XOU NANT MORE SELP?^ 
rtLBAVE IF NO MORE HELP WANTED 
H~INIBS)/0 


PRINT 'ENTER ONE OF THE FOLLOWING 
TRANSITION (H) MATRIX i » 

PRINT ” ~ ' 


TYPES FOR THE INTBRPHASE 


PRINT ’ GIVEN 

A TIME. ' 


YOU WILL INPUT AN F MATRIX, ONE ROW AT 


PRINT » » 


PRINT * IDENTITY 
ASSUMING THE MATRIX' 
PRINT * 

STATE CHANGE' 


METAPHOR WILL GENERATE AN MATRIX 
REPRESENTS A SYSTEM IN WHICH THERE IS NO 


PRINT ' BETWEEN PHASES. 

GENERATES AN IDENTITY MATRIX . ' 

PRINT " 


THUS, METAPHOR 


PRINT ' ' 


PRINT 'DO YOU WANT REFERENCES?' 
ft LEAVE IF NOT 


^{~INYES)/Q 


PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
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ANALYSIS, SEE^ 

1211 PRINT »» 

C223 PRINT ’ J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE » 

[23] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ," NASA 
GRANTS 

C24] PRINT » NSG 1306, STATUS REPORT NO. 3,, NOVEMBER 1977. » 

C 2 5 ] PRINT » • 

[26] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[27] PRINT ' ' 

[28] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
TEE ' 

[29] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,' ' NASA 
GRANT' 

[30] PRINT » NSG 1306, STATUS REPORT NO. 4, JULY 1978.' 

[31] PRINT " 

[32] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[33] PRINT " 

[34] PRINT ' S. PAKIN , "^PZ:\360 REFERENCE MANUAL ," SCIENCE 
RESEARCH ' 

[35] PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.' 

[36] PRINT " 
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GIV INFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GIVINFO 


PURPOSE: To generate the GETTVECTOR HELP 

information. 


GLOBAL VARIABLES: ' None. 


CALLING FUNCTIONS: COMMANDHELP. 


FUNCTIONS CALLED: INYES , PRINT. 


COMMENTS:' Prints the information associated with the 
GET^VECTOR function. If the user wishes 
references, GIV INFO also prints a small 
selection of references. 


LISTING: 

V GIVINFO 
Cl] n 

[2] n ROUTINE GIVING HELP ON INPUTTING I VECTORS 

C 3 ] fl 

[4] PRINT CENTER THE INITIAL PROBABILITY DISTRIBUTION FOR THIS 
TRAJECTORY , ' 

[5] PRINT 'TYPE A PROBABILITY BETWEEN ZERO AND ONE INCLUSIVE 
CORRESPONDING TO EACH' 

C6] PRINT 'STATE"S INITIAL PROBABILITY , SEPARATE EACH NUMBER 
WITH SPACES AND/OR COMMAS . ' 

[7] PRINT 'THE ORDER OF THE ENTRIES SHOULD CORRESPOND TO THE ORDER 
OF THE INITIAL STATES.' 

[8] PRINT 'THE NUMBER OF ENTRIES SHOULD BE THE SAME AS THE NUMBER 
OF STATES' 

C9] PRINT 'IN THE FIRST PHASE MODEL.' 

[10] PRINT 'EXAMPLE'.' 

Cll] PRINT ' .3 0.5..2’ 

[12] PRINT 'THIS INFORMS METAPHOR THAT FOR THE TRAJECTORY SET UNDER 
CONSIDERATION , THE' 

[13] PRINT 'PROBABILITY THE SYSTEM BEGINS IN THE FIRST STATE OF 
PHASE 1 IS 0.2, FOR THE' 

[14] PRINT 'SECOND STATE, THE PROBABILITY IS 0.5, AND FOR THE THIRD 
STATE, THE PROBABILITY' 

[15] PRINT 'IS 0. 2. ’ 

[16] PRINT " 

[17] PRINT 'DO YOU WANT REFERENCES?' 
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[18] Ft LEAVE IF EOT 

[19] -^{^lEIES) /O 

[20] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS^ SEE' 

[21] PRINT " 

[22] PRINT ’ J. F. MEYER y "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[23] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[24] PRINT ' ,NSG 1306, STATUS REPORT NO. 3, NOVEMBER- 1977. » 

[25] PRINT " 

[26] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR . SEE' 

[27] PRINT " 

[28] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EV ALUATING 
THE ' 

[29] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS '' NASA 
GRANT' 

[30] PRINT ' NSG 1306. STATUS REPORT NO. 4, JULY 1978.’ 

[31] PRINT " 

[32] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[33] PRINT ' ' 

[34] PRINT ' S. PAKIN , " APL\Z&Q REFERENC E M AN UAL ' ' SCIENCE 
RESEARCH ' 

'[35] PRINT ' ASSOCIATES , INC , , CHICAGO, 1972,’ 

[36] PRINT ' ' 

V 
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ijiMiwru 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GNINFO 


PURPOSE: To generate the GNFAIL HELP information. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS; COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the informatnon associated with the 

^NFAIL function. If the user wishes 
references, GNINFO also prints a small 
selection of references. 


Cl] 

C2] 

C3] 

C4] 

[5] 

[ 6 ] 

C7] 

[ 8 ] 

[3] 

[ 10 ] 

[ 11 ] 

[ 12 ] 

[13] 

[14] 

[15] 

[16] 

[ 17 ] 


LISTING: 

V Gin^FO 
n 

n BOUTIN E GIVING HELP ON NFAIL TYPE P MATRIX 
A 

PRINT ' METAPHOR NILE GENERATE A P MATRIX ASSUMING THE MATRIX 
REPRESENTS A ' ~ 

PRINT 'SYSTEM HAVING M GROUPS OF K{N) COMPONENTS EACH^ NHERE K 
IS A ^ 

PRINT 'FUNCTION OF THE GROUP. THE COMPONENTS' FAIL 
INDEPENDENTLY' 

PRINT 'AND ARE ASSUMED TO HAVE A POISSON DISTRIBUTION . ALSO 
ONCE > 

PRINT 'A COMPONENT HAS FAILED, IT CANNOT BECOME GOOD AGAIN ’ 
PRINT 'THE STATE OF THE SYSTEM IS THE NUMBER OF ACTIVE 
COMPONENTS ' 

PRINT 'IN EACH GROUP. THE NUMBER OF STATES DECLARED' 

PRINT 'FOR THE PHASE MUST BE THE PRODUCT OF ITHE NUMBER OF 
COMPONENTS ' 

PRINT 'IN EACH GROUP PLUS ONE'S. FOR EXAMPLE, IF THE SYSTEM 
HAS 3 GROUPS' 

PRINT 'CONTAINING RESPECTIVELY 2, 5, AND 7 COMPONENTS THEN 
THE PHASE HAS' 

PRINT *(2+1)x(5+1)x(7+1)-«-144 STATES. ' 

PRINT ' ' 


PRINT 'YOU WILL BE ASKED THE LENGTH OF THE PHASE' 
SINGLE POSITIVE INTEGER.' ’ 


ENTER A 


PRINT 'NEXT YOU WILL BE PROMPTED FOR THE FAILURE RATE OF TEE 
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COMPONENTS. ' 

Cl 83 PRINT ^ AGAIN ENTER A SINGLE POSITIVE NUMBER. IF THIS NUMBER 
IS NOT BETWEEN^ 

[19] PRINT »l£^“l AND XE 10, YOU WILL BE ASKED FOR 
CONFIRMATION . YOU WILL THEN ’ 

[20] PRINT *BE ASKED THE NUMBER OF GROUPS; ENTER THIS AS A SINGLE 
POSITIVE INTEGER. » 

[21 3 PRINT ^FINALLY, METAPHOR WILL REQUEST THE NUMBER OF COMPONENTS 
IN EACH GROUP.' 

[22] PRINT 'THIS SHOULD BE INPUT AS A ROW OF POSITIVE INTEGERS 
SEPARATED BY ' 

[23] PRINT 'SPACES OR COMMAS.' 

[243 PRINT " 

[253 PRINT 'DO YOU WANT REFERENCES?' 

[263 n LEAVE IF NOT 

[27] -^{-INYES) /Q 

[283 PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[293 PRINT ' ' 

[30] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[313 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS " NASA 
GRANT ' 

[323 PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977 » 

[33] PRINT " 

[343 PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR SEE' 

[353 PRINT " 

[36] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[37] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS " NASA 
GRANT' 

[383 PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 » 

[39] PRINT ' ' 

[403 PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[413 PRINT " 

[423 PRINT ' S. PAKIN , »'/5Pi\360 REFERENCE MANUAL ," SCIENCE 
RESEARCH ' 

[43] PRINT ' ASSOCIATES, INC ., CHICAGO, 1972.' 

[443 PRINT " 

V 
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GNA IMFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GNAINFO 


PURPOSE: To generate the GETNUMACCLEV HELP 

information. 


GLOBAL VARIABLES: None, 


CALLING FUNCTIONS: COMMANDHELP, 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETNUMACCLEV function. If the user wishes 
references, GNA INFO also prints a small 
selection of references. 


LISTING: 

V GNAINFO 
Cl] n 

[2] n ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF 
ACCOMPLISHMENT LEVELS 

C3 ] fi 

[4] PRINT 'ENTER THE NUMBER OF ACCOMPLISHMENT LEVELS FOR THIS 
MODEL AS A SINGLE POSITIVE INTEGER.' 

C5] PRINT 'EXAMPLEi' 

[6] PRINT ' 5' 

[7] PRINT 'THIS INDICATES TO METAPHOR THAT THE MODEL IT IS 
EVALUATING HAS 5 ACCOMPLISHMENT LEVELS.' 

[ 8 ] PRINT ' ' 

[9] PRINT 'DO YOU WANT REFERENCES?' 

CIO] n LEAVE IF NOT 

Cll] ■^{'^INYES) /Q 

Cl2] PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
ANALYSIS, SEE' 

Cl3] PRINT " 

Cl4] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ■ • 

Cl5] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT ' 

Cl6] PRINT ' NSG 1306. STATUS REPORT NO. 3, NOVEMBER 1977.' 

C 1 7 ] PRINT ' ' 

Cl 8] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR SEE' 

Cl9] PRINT " ’ 
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[20] PRINT » J. F. MEYER, '^MODELS AND TECHNIQUES FOR EVALUATING 
THE » 

[21] PRINT » EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS * ' NASA 
GRANT * 

[22] PRINT ’ NSG 1306, STATUS REPORT NO. 4, JULY 1978.' 

[23] PRINT " 

[24] PRINT ^FOR FURTHER INFORMATION REGARDING APL , SEE* 

[25] PRINT " 

[26] PRINT ’ S. PAKIN, * * APL\360 REFERENCE MANUAL ,* * SCIENCE 
RESEARCH » 

[27] PRINT * ASSOCIATES, INC . , CHICAGO, 1972.' 

[28] PRINT ” 

V" 
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GNBV INFO 

METAPHOR FUNCTIOM DESCRIPTION 
CALLING SEQUENCE: GKBVINFO 


PURPOSE: To generate the GE THUMB ASIC VARIABLES HELP 

information. 


GLOBAL VARIABLES: None, 


calling FUNCTIONS; CQMMANDH ELP. 

FUNCTIONS CALLED; INYES, PRINT. 


COMMENTS: Prints the information associated with the 

G^MUMBASIC VAR tables function. If the user 
wishes references, GNBV I.NFO also prints a 
small selection of references. 


Cl3 

121 

IBI 

C4] 

C5] 

[63 

[73 

[83 

[93 

[103 

[113 

[123 

[133 

[143 

[153 

[163 

[173 

[183 

[193 


LISTING: 
V GNBVI NFO 

ff 


fl ROUTINE GIVING HELP ON INPUTTING BASIC VARIABLES 


NUMBER OF BASIC VARIABLES WHOSE PROBABILITIES 
REMAIN TIME- INVARIANT^ 

’TFFOZ/GFOZ/T the MISSION INTERVAL (I ,E . , THE NUMBER OF 
TIME-INVARIANT BASIC VARIABLES.)^ ^ 

PFJil^T ^THE NUMBER SHOULD BE A SINGLE POSITIVE INTEGER * 

PRINT *EXAMPLE%' 


PRINT * 2 » 

PRTWT ^THIS INFORMS METAPHOR TEAT TWO TIME- INV ARI ANT BASIC 
VARIABLES ARE CONSIDERED IN TEE' 

PRINT 'MODEL,' 

PRINT ' ' 

PRINT 'DO 10 U WANT REFERENCES?' 

R LEAVE IF NOT 
^(.-INIES) /Q 

^AnYl^Is7s^^ SE?'^^^^ ON PERFORM ABILITY MODELING AND 

J. F, MEYER, ''MODELS AND TECHNIQUES FOR EV ALUATING 
EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ' NASA 


PRINT ' ' 
PRINT ' 
THE ' - ■ 
PRINT ' 
GRANT' 


PRINT ' NSG 1306. STATUS REPORT NO, 3. NOVEMBER 1977, » 
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[20] PRINT ' ' 

[21] PRINT ^FOR FURTHER INFORMATION REGARDING METAPHOR^ SEE^ 

[22] PRINT •» ^ 

[23] PRINT » J, F. MEIER, * ^MODELS AND TECHNIQUES FOR EVALUATING 
THE » 

[24] PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ' NASA 
GRANTS 

[25] PRINT » NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

[26] PRINT » » 

[27] PRINT ^FOR FURTHER INFORMATION REGARDING APL , SEE^ 

[28] PRINT ” 

[23] PRINT ’ S. PAKIN , ”/3PL\360 REFERENCE MANUAL * SCIENCE 
RESEARCH ’ 

[30] PRINT ’ ASSOCIATES, INC . , CHICAGO, 1972.’ 

[31] PRINT * ’ 
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GNPI NFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GNP IMFO 

PURPOSE: To generate the GETNUMPHASES HELP 

information. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: COMMANDHELP. 


FUNCTIONS CALLED; INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETNUMPHASES function. If the user wishes 
references, GNP INFO also prints a small 
selection of references’. 


LISTING: 

? GNPISFO 

111 

t2l Pi ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF PEASES 
£3] ft 

C43 PRINT *SNTER TEE NUMBER OF PEASES IN TEE FINITE PEASE MODEL AS 
A SINGLE' 

US’] PRINT 'POSITIVE INTEGER.' 

[63 PRINT 'EXAMPLE:' 

[73 PRINT ' 3 » 

[83 PRINT 'THIS INDICATES TO METAPHOR TEAT TEE MODEL TO BE 
EVALUATED HAS Z PEASES' 

[93 PRINT 'DO YOU WANT REFERENCES?' 

[103 ft LEAVE IF NOT 
[ 11 ] •^{~INYES) /D 

[123 PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITl MODELING AND 
ANALYSIS. SEE' 

[133 PRINT " 

[ 14 ] PRINT ' J. F. MEYER. "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[153 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS." NASA 
GRANT' 

[ 16 ] PRINT ' NSG 1306 , STATUS REPORT NO. 3 , NOVEMBER 1977 .’ 

[17] PRIST ' ' 

[ 18 ] PRINT 'FOR FURTHER INFOPMATION REGARDING METAPHOR . SEE' 

[ 19 ] PRINT " 

[ 20 ] PRINT ' J. F. MEYER. "MODELS AND TECHNIQUES FOR EVALUATING 
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1213 

1223 

£233 

C24] 

[253 

[263 

[273 

[283 


TBE » 

grants' OF AIRCRAFT COMPUTING SYSTEM S,'>' RASA 

PRINT » NSG 1306. STATUS REPORT NO. 4. JULY 1978 » 

PRINT » * » X o . 

PRINT ^FOR FURTHER INFORMATION REGARDING APL , SEE' 

PRINT ’ * 

PRINT » S. PAKIN, "APL\330 REFERENCE MANUAL ' ' SCIENCE 
RESEARCH' 

PRINT ' ASSOCIATES, INC . , CHICAGO, 1972 » 

PRINT ' ' 
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GNTS IMFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GNTSINFO 


PURPOSE : 


To generate the GETNUMTR ASSETS HELP 

information. 


GLOBAL VARIABLES; None. 


CALLING FUNCTIONS: COMMANDH ELP. 

FUNCTIONS CALLED; INYES, PRINT. 


COMMENTS: Prints the information associated with the 

G^NUMTRAJSETS function. If the user 
wishes references, GNJS INFO also prints a 
small" selection of references. 


L13 

121 

[ 3 ] 

[53 

[63 

[73 

[83 

[93 

[103 

[113 

[123 

[133 

[143 

[153 

[163 

[173 

[183 

[193 


LISTING: 

V GNTSI NFO 
n 

fi ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF 
TRAJECTORIES IN A GIVEN ACCOMPLISHMENT LEVEL 

PRINT * ENTER THE NUMBER OF TRAJECTORY SETS ASSOCIATED WITH 
THIS ACCOMPLISHMENT' Hoouuj.Hie.u WliH 

PRINT 'LEVEL AS A SINGLE POSITIVE INTEGER ' 

PRINT ' EXAMPLE i' 

PRINT » 

ACCOMPLISHMENT LEVEL HAS 

PRINT 'SETS DESCRIBING IT.' 

PRINT ' ' 

PRINT 'DO YOU WANT REFERENCES?' 
n LEAVE IF NOT 
■^(.-INYES) /Q 

os FERMBMABILIII MODBCISG ASD 

Jil\f Ji Ij JL ^ J. o f 

J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS, ' * NASA 
NSG 1306 , STATUS REPORT NO, 3 , NOVEMBER 1977 . ’ 


PRINT ' ' 
PRINT ' 
THE ' 
PRINT » 
GRANT ' 
PRINT ' 
PRINT ' ' 
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[ 20 ] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR^ SEE' 

[ 21 ] PRINT " 

[ 22 ] PRINT ' J. F. MEIER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[ 23 ] PRINT ' 'EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS, ' ' NASA 
GRANT' 

[ 24 ] PRINT ' NSG 1306 , STATUS REPORT NO. 4 , JULY 1978 .* 

[ 25 ] PRINT ' ' 

[ 26 ] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[ 27 ] PRINT *» 

[2 8 ] PRINT ' S. PAKIN , " APL\ZQQ REFERENCE MANUAL," SCIENCE 
RESEARCH' 

[ 29 ] PRINT ' ASSOCIATES, INC . , CHICAGO, 1972 .* 

[ 30 ] PRINT " 
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GPMINFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE; GPMINFO 


PURPOSE; 

GLOBAL VARIABLES; 
CALLING FUNCTIONS; 
FUNCTIONS CALLED; 


To generate the 
information. 

None . 

COMMANDH ELP. 

INYES, PRINT, 


GETPMATRICES HELP 


COMMENTS: Prints the information associated with the 

GETPMATRICES function. If the user wishes 
references, GPM INFO also prints a small 
selection of references. 


Cl] 

[ 2 ] 

[3] 

[4] 
C5] 
C6] 
C7] 
C8] 

C9] ' 
CIO] 

Cll] 

Cl2] 

Cl3] 

Cl4] 

CIS] 

Cl6] 

C17] 

C18] 


LISTING; 

7 GPMI NFO 

fl 

fi ROUTINE GIVING HELP ON INPUTTING P MATRICES 

Pi 

PRINT ^TIPE ONE OF'. GIVEN ^ DEDFAIL, NFAIL ^ IDENTITY' 

PRINT 'DO YOU WANT MORE HELP?' 

PiLEAVE IF NO MORE HELP WANTED 
■*{~INYES') /O 

PRINT 'ENTER ONE OF TEE FOLLOWING TYPES FOR THE STATE 
TRANSITION (P) MATRIX'.' 

PRINT ' ' 

PRINT ' GIVEN 

TIME. ' 

PRINT ' ' 

PRINT • BED FAIL 

ASSUMING THE MATRIX' 

PRINT ' 

EACH FAILING' 

' INDEPENDENTLY AND EACH 

DISTINGUISHABLE. THE STATE' 

PRINT ' OF THE SYSTEM IS THE STATE OF EACH OF 

THE COMPONENTS . ' 

PRINT ' YOU WILL BE ASKED THE LENGTH OF THE 

PHASE AND THE FAILURE' 

' RATE OF THE COMPONENTS.' 

PRINT " 


YOU WILL INPUT A P MATRIX, ONE ROW AT A 

METAPHOR WILL GENERATE A F MATRIX 
REPRESENTS A SYSTEM HAVING N COMPONENTS , 
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L191 

C20] 

C213 

C22] 

C23] 

C24:i 

C2s: 

[26] 

[27] 

[28] 

[29] 

[30] 

[31] 

[32] 

[33] 

[34] 

[35] 

[36] 

[37] 

[38] 

[39] 

[40] 

[41] 

[42] 

[43] 

[44] 

[45] 

[46] 

[47] 

[48] 

[49] 

[50] 

[51] 

[52] 


THE COMPONENTS FAIL INDEPENDENTLY AND 
SYSTEM IS THE NUMBER OF ACTIVE {N0N+ 

IN EACH GROUP. YOU WILL BE ASKED THE 
THE NUMBER OF COMPONENTS IN EACH GROUP, 
OF THE PHASE, AND THE FAILURE RATE OF 


REPRESENTS A SYSTEM IN WHICH THERE IS NO 
NO CHANGES IN STATES ARE MADE. THUS, 

AN IDENTITY MAT^IX.'^ 


PRINT • NFAIL METAPHOR WILL GENERATE A P MATRIX 

ASSUMING THE MATRIX^ ~ 

PRINT » REPRESENTS A SYSTEM HAVING M GROUPS OF 

KiM) COMPONENTS EACH.' 

PRINT » 

THE STATE OF THE' 

PRINT ' 

FAILED) COMPONENTS ' 

PRINT ' 

NUMBER OF GROUPS, ' 

PRINT ' 

THE LENGTH' 

PRINT ' . 

THE COMPONENTS . ' 

PRINT ' ' 

PRINT ' IDENTITY METAPHOR WILL GENERATE A P MA^PTy 

ASSUMING THE MATRIX' “ 

PRINT ' 

FAILURE, I.E.,' 

PRINT ' 

METAPHOR GENERATES' 

PRINT ' 

PRINT " 

PRINT ' ' 

PRINT 'DO YOU WANT REFERENCES?' 

R LEAVE IF NOT 
-^{~INYES) /Q 

PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
PRINT » » 

"MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

^RMT'' effectiveness OF AIRCRAFT COMPUTING SYSTEMS.," NASA 
Sjf? *" 1306, STATUS REPORT NO. 3. NOVEMBER 1977.' 

INFORMATION REGARDING METAPHOR , SEE' 

MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

lu Li * 

^G?ANT'' effectiveness OF AIRCRAFT COMPUTING SYSTEMS," NASA 

PRINT ' NSG 1ZQ9, STATUS REPORT NO. 4. JULY 1978 • 

PRINT " 

PRINT 'FOR FURTHER INFORMATION REGARDING APL SEE' 

PRINT ’ * 

TeWaRCH' *'^Pi\360 REFERENCE MANUAL," SCIENCE 

PRINT ' associates, INC . , CHICAGO, 1972 » 

PRINT " 
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METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GSINFO 


PURPOSE: 


To generate 
information. 


the 


GETSTATES 


HELP 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS; 


COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETSTATES function. If the user wishes 
references, GSINFO also prints a small 
selection of references. 


Cl] 

C2] 

C3] 

[4] 

[5] 

[ 6 ] 
C7] 
C8] 
C3] 

CIO] 

Cli] 

Cl2] 

C13] 

C14] 

Cl5] 

C16] 

Cl7] 


LISTING: 

V GSINFO 
a 

riff giving help ON INPUTTING THE NUMBER OF STATES 

-iiv HjAch phase 

PI 

PRINT ^THE NUMBER OF STATES MUST BE A POSITIVE INTEGER ’ 

PRINT ^ EXAMPLE:^ , 

PRINT • 4 3,5f 

lfiEs\^VHE MT^psor that the first phase has 4 

^ ^T/ITF'5, AND THE THIRD PHASE HAS 5 

O^F^STAt M^^^^^^^ TO make sure that the number of groups 

input earlier, AN ERROR 

PRINT 'PRINTED IF THEY DO NOT MATCH,' 

PRINT 'DO YOU WANT REFERENCES?' 
a LEAVE IF NOT 
■^{'•‘INYES) fO 

^M^LYs'/s^f S eT'^^^^ PPPPORM ABILITY MODELING AND 
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[ 18 ] PRINT » » 

[ 19 ] PRINT » J, F. MEXER^ '^MODELS AND TECENIQVES FOR EVALUATING 
THE » 

[ 20 ] PRINT » EFFECTIVENESS OF AIRCRAFT COMPUTING SXSTEMS,'^ NASA 
GRANT ' 

[ 21 ] PRINT » NSG 1306 , STATUS REPORT NO. 3 , NOVEMBER 1977 .’ 

[ 22 ] PRINT » ’ 

[ 23 ] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR ^ SEE' 

[ 24 ] PRINT " 

[ 25 ] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[ 26 ] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[ 27 ] PRINT ' NSG 1306 , STATUS REPORT NO. 4 , JULY 1978 . » 

[ 28 ] PRINT ' ' 

[ 29 ] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[ 30 ] PRINT " 

[ 31 ] PRINT ' S. PAKIN, "APL\ZeO REFERENCE MANUAL SCIENCE 
RESEARCH' 

[ 32 ] PRINT ' ASSOCIATES, INC . , CHICAGO, 1972 .’ 

[ 33 ] PRINT " 

V 
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GW IMFO 

METAPHOR FUNCTION DESCRIPTION 
CALLING SEQUENCE: GWINFO 


PURPOSE: To generate the GETWECTOR HELP 

information. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

GETVVECTOR function. If the user wishes 
references, GW INFO also prints a small 
selection of references. 


LISTING; 

V GWINFO 

Cl] fl 

[2] fl ROUTINE GIVING HELP ON INPUTTING TEE TIME-INV ARIANT BASIC 
VARIABLE VECTOR 

[3] fl 

[4] PRINT CENTER A VECTOR OF AND TO INDICATE 

WHETHER THE ’ 

CS] PRINT ^ TIME- INVARIANT BASIC VARIABLE" S OCCURRENCES OR NON+ 
OCCURRENCES SHOULD BE' 

[6] PRINT 'CONSIDERED IN THE TRAJECTORY SET. 'PHE CODING IS AS 
FOLLOWS'.' 

[ 7 ] PRINT ' ' 

[8 3 PRINT ' 0 THE CORRESPONDING BASIC VARIABLE" S 

OCCURRENCE SHOULD' 

[9] PRINT ' be CONSIDERED' 

CIO] PRINT " 

Cll] PRINT ' the corresponding BASIC VARIABLE" S NON- 

OCCURRENCE' 

Cl2] PRINT ' SHOULD BE CONSIDERED' 

Cl 3] PRINT " 

Cl4] PRINT ' EITHER THE OCCURRENCE OR NON-OCCURRENCE 

OF THE ' 

CIS] PRINT ' CORRESPONDING BASIC VARIABLE SHOULD BE 

CONSIDERED ' 

CIS] PRINT ' (J.F., THE BASIC VARIABLE IS A "DONT"T 

CARE 
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[17 3 PRINT ’ » 

[18] PRINT CENTER A ROW OF 0»*5, l’»5, AND 2»»5, SEPARATING EACH 
ENTRY BY SPACES' 

[19] PRINT 'AND/OR COMMAS. THE NUMBER OF ENTRIES SHOULD BE THE 
SAME AS THE ’ 

[20] PRINT 'NUMBER OF TIME- INV ARI ANT BASIC VARIABLES DECLARED 
EARLIER. ALSO THE ORDER' 

[21] PRINT 'OF THE ENTRIES SHOULD CORRESPOND TO THE ORDER OF THE 
BASIC VARIABLES' 

[22] PRINT 'AS CONSIDERED ELSEWHERE IN THE METAPHOR PACKAGE.' 

[23] PRINT 'EXAMPLE:' 

[24] PRINT ' 0.1 1 , 2» 

[25] PRINT 'THIS INDICATES TO METAPHOR THAT FOR THIS TRAJECTORY 
SET, THE OCCURRENCE' 

[26] PRINT 'OF THE FIRST TIME-INV ARIANT BASIC VARIABLE IS IMPORTANT 
TO THE TRAJECTORY' 

[27] PRINT 'SET, TEE NON-OCCURRENCE OF THE SECOND AND THIRD TIME- 
INVARIANT BASIC VARIABLES' 

[28] PRINT 'IS IMPORTANT, AND THAT THE FOURTH TIME+INV ARIANT BASIC 
VARIABLE IS IRRELEVANT .' 

[29] PRINT " 

[30] PRINT 'DO YOU WANT REFERENCES?' 

[31] R LEAVE IF NOT 

[32] -^i~INYES) /O 

[33] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[34] . PRINT " 

[35] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[36] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[37] PRINT ' NSG 1306. STATUS REPORT NO. 3. NOVEMBER 1977.’ 

[38] PRINT ' ' 

[39] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR . SEE' 

[40] PRINT »' 

[41] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[42] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[43] PRINT ' NSG 1306. STATUS REPORT NO. 4. JULY 1978.* 

[ 44 ] PRINT ' ' 

[45] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[46] PRINT " 

[47] PRINT ' S. PAKIN , " APL\Z&Q REFERENCE MANUAL SCIENCE 
RESEARCH ' 

[48] PRINT » ASSOCIATES , INC . , CHICAGO, 1972.’ 

[49] PRINT » » 

V 
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METINFO 


METAPHOR FUNCTION DESCRIPTION 


CALLING SEQUENCE; METINFO 


PURPOSE: To generate the METAPHOR HELP information. 


GLOBAL VARIABLES: None. 


CALLING FUNCTIONS: COMMANDHELP. 


FUNCTIONS CALLED: INYES, PRINT. 


COMMENTS: Prints the information associated with the 

METAPHOR function. If the user wishes 
references, MET INFO also prints a small 
selection of references. 


LISTING: 
V METINFO 


fi ROUTINE GIVING HELP ON METAPHOR 

PI 

PRINT * METAPHOR IS AN INTERACTIVE SOFTWARE PACKAGE AIDING THE 
MODELING • 

PRINT 'AND ANALYSIS OF PERFORM ABILITY . AT PRESENT. METAPHOR 
IS CAPABLE ' 

PRINT 'ONLY OF EVALUATING CERTAIN PERFORM ABILITY MODELS.' 
PRINT 'THE COMMANDS PRESENTLY AVAILABLE AREi EVAL.HELF. DATA 
ALTER. CALC,' 

’ COM, BRIEF LONIOFF2, ECHO lON\OFFl, AND 

EXIT . ' 

PRINT 'DO YOU WANT MORE HELP?' 
n IF NOT, LEAVE 
■^i~INYES) /O 

PRINT 'THE COMMANDS CAN BE ENTERED AT ANY TIME EXCEPT IN 
RESPONSE TO A ' 

PRINT 'YES/jfO QUESTION. THE COMMANDS ARE 'AS FOLLOWS-' 

PRINT ' ’ 

PRINT ' EVAL EVALUATE A USER SUPPLIED 

PERFORM ABILITY MODEL' 

PRINT ' ' 

PRINT ’ HELP GIVE MORE INFORMATION ABOUT THE 

QUESTION BEING ' 

PRINT ' ASKED' 

PRINT ' ' 
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1201 

L2ll 

L221 

[23] 

[24] 

[25] 

[26] 

[27] 

[28] 

[29] 

[30] 

[31] 

[32] 

[33] 

[34] 

[35] 

[36] 

[37] 

[38] 

[39] 

[40] 

[41] 

[42] 

[43] 

[44] 

[45] 

[46] 

[47] 

[48] 

[49] 

[50] 

[51] 

[52] 

[53] 


PRINT ' DATA 

MODEL PARAMETERS' 
PRINT ' » 

PRINT ’ ALTER 

MODEL PARAMETERS' 
PRINT » ' 

PRINT ' CALC 

"EXIT" TO LEAVE.' 
PRINT ' ' 

PRINT ' COM 

PRINT ' ' 

PRINT 'BRIEF ION \OFFl 
PRINT ' ' 


DISPLAY VARIABLE INFORMATION AND 

CHANGE VARIABLE INFORMATION AND 

ENTER THE APL CALCULATOR MODE. TYPE 

ENTER COMMENTS ON THE OUTPUT' 

TURN BRIEF OUTPUT ON OR OFF' 


PRINT ' ECHO LONlOFFl TURN INPUT ECHO ON OR OFF' 

PRINT " 

PRINT ' EXIT LEAVE METAPHOR' 

PRINT ' ' 

PRINT 'DO YOU WANT REFERENCES?' 
n LEAVE IF NOT 


^{~INYES) /Q 

PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
ANALYSIS t SEE' 

PRINT ' ' 

PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING ■ 
THE * 

PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ’’ NASA 
GRANT' * 

PRINT ' NSG 1306, STATUS REPORT NO. 3. NOVEMBER 1977 » 

PRINT " 4. ^ . 

PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR SEE' 

PRINT " 

PRINT ' J. F. MEYER, ''MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

PRINT EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,'' NASA 

PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 » 

PRINT »» , 

PRINT 'FOR FURTHER INFORMATION REGARDING APL SEE' 

PRINT " » oac 

lVi.ViJr.rr, "APL\ZSQ REFERENCE MANUAL," SCIENCE 

RE SEARCH ' 

PRINT ' ASSOCIATES, INC .', CHICAGO, 1972 ' 

PRINT " 
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APPENDIX: Listing of METAPHOR 

Below we present a complete listing of METAPHOR, Version 1. The 
functions are grouped somewhat arbitrarily by purpose. Each 
information function is below the function which it describes. An 
alphabetical ordering is presented in the descriptions of Section 6. 
As a summary of the contents of this section, the outline below 
gives the function groupings with no listing. 


Main Functions 

METAPHOR 

DEC LAR EM ETA PH OR 

METINFO 


Command Functions 

COMMANDALTER 

COMMANDBRIEF 

COMMANDCALC 

COMMANDCOM 

COMMANDDATA 

COMMANDECHO 

COMMANDS VAL 

COMMANDH ELP 

Command Support Functions 

BRIEF 

ECHO 

GETALTERVECTOR 

GAV INFO 

GETDATAVECTOR 

GDVINFO 


Command EVAL Implementa ti^on 
Functions 

GETNUM PHASES 
GNPINFO 
GETS TATES 
GSINFO 
GETPMA TRICES 


GETHMATRICES 
GETNUMBASICVARIABLES - 
GNBVINFO 

GETS AS ICVAR TABLES 
GBVINFO 
GETNUMACCLEV 
GNAINFO' 

GETPERF 

PUTPERFORMABILITY 

Matrix Generator Functions 

GENERA TEHMATRIX 
GHMINFO 

GENERATE PMATR IX 

GPMINFO 

GDEDFAIL 

GDINFO 

GGIVEN 

GGINFO 

GIDENTITY 

GNPAIL 

GNINFO 

Performability Computation 
Functions 

GETACCLEVPROB 

GETNUMTRA'JSETS 

GNTS INFO 

GET_IVECT0R 

GIV INFO 

GETGMATRICES 

GGM INFO 
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GETFVECTOR 

GFVINFO 

GETWALUES 

GVV INFO 

CALCTRAJPROB 

I/O and Checking Functions 

INPUT 

INYES 

CHECKS IN 

CHECKPOSI 

CHECKPROB 

CHECKTRI 

PRINT 

PRINTQUAD 

APL Support Function 
ENCODE. 
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MAIN functions 


V METAPHOR 
Cl] n 

* Z2l Pi 

Ca] R 

C43 fi PROGRAM FOR EVALUATION OF PERFORMABILITIES 
rs ] fl 
L&l Pi 

H7] fl SET PROGRAM CONSTANTS 
C 8 3 DECLAREMETAPHOR 

[9] fl 
CIO] fl 

Cl 13 R PRINT HEADING 
C123 PRINT »» 

Cl33 PRINT •» 

C143 PRINT ^MICHIGAN EVALUATION AID FOR PERPHORM ABILITY^ 

CIS] PRINT ’» _ _ _ 

Cl6] PRINT 
C 1 7 3 PRINT » » 

C 1 8 3 PRINT » ' 

Cl93 PRINT 'TYPE HELP FOR ASSISTANCE' 

C203 fi PROGRAM LOOPS UNTIL EXIT TAKEN 
C213 MINi& INPUT MET 
C22 3 -^MIN 

7 


7 DECLAREMETAPHOR 
Cl3 . fl • 

C23 fl DECLARES AND INITIALIZES THE CONSTANTS USED~IN THE 'PERF' 
FUNICTZON SERIES 
C3 3 k ■ • 

C4 3 fl-' SET THE LIST OF COMMANDS 
Cs3 HE Lp^' Help » 

C63 .EXIT-f^' EXIT » 

C73 DAT‘A?^'DATA ' 

CS3 ALTERS' ALTER ' 

C9 3'‘' CAIC-f'CALC » 

C 1 O'] • c6m-^ '"com ' 

Cll] ■ EVAL-^'EVAL ' 

Cl2] ON-ir^ON ' 

Cl3] OFF^'OFF ' 

C 1 4 3 COMM AND SI ZE^S 

CIS] COMMANDLIST^iSyCOMMANDSIZE) a'HELP ''EXIT ' 'DATA ' 'ALTER 
' t'CALC 't'ECHO ' t 'BRIEF ','COM '.'EVAL ' 

Cl6] fl 
Cl7] fl 

Cl 8 3 fl SET LIST OF MATRIX GENERATOR TYPES 
Cl 9 3 GIVEN^' GIVEN ' 

C 2'0 3 DED FAIL-^'DED FA IL- ' 
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[21] ^FAIL-<-^NFAIL ' 

[22] IBENTITI-^' IDENTITY' 

[23] ^ATRIXLIST-*-{'i GIVEN ' ,'DEDFAIL ' .'NFAIL 

'IDENTITY' 

[24] HMATRIXLIST<‘{2 Q)p' GIVEN 'IDENTITY' 

[25] R 

[26] fl 

[27] n 

[28] fi SET LIST OF ROUTINES FOR HELP CALLS 

[29] GNP^ l 

[30] GS-(-2 

[31] GPM^Z 

[32] ^^4 

[33] GN^5 

[34] gJ-e-6' 

[35] GHM< -1 

[36] GNBV^ Q 

[ 37 ] GBV^ B 

[3 8] g^-f-10 

[39] gjy- ^11 

[40] GGM- *-l 2 

[41] GFV- ^IZ 

[42] GVV^m 

[43] GNTS^ l 5 

[44] g^F- i-16 

[45] GDV^ l 7 

[46] MET-^IQ 

[47] ft 

[48] ft SET NUMBER OF HELP ROUTINES 
[4 9] NUMHELPROUTINES-^IS 

[50] ft 

DEFINITION SWifCHES. 1 IF VARIABLE DEFINED 0 
IF NOT, " ’ 

[52] DEFN UMPEA SES*- 0 
[ 53 ] DEFNUMSTATES^O 

[54] DEFP-^Q 

[55] DEFH-f^O 

[56] DEFNUMBASICVARIABLES<-0 

[57] DEFBASICVARIABLES^Q 

[58] DEFNUMACCLEV*-0 

[59] DEFNUM TRA J SETS*- 0 

[60] DEFI^Q 

[61] DEFG*-Q 

[62] DEFF-^O 

[63] DEFV^O 

[64] DEFPERFORMABILITY<-0 

[65] DEFACE LEV EL-*-0 

[ 66 ] ft 

[67] ft MAKE DEFAULT SWITCH SETTltCS 

[68] BRIEFO UTPUT*- 0 

[69] ECHOINPUT^^ 

7 
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7 METniFO 

Cl] n 

C23. ft ROUTINE GIVING HELP ON METAPHOR 
C3 ] ft 

[4] PRINT 'METAPHOR IS AN INTERACTIVE SOFTWARE PACKAGE AIDING THE 
MODELING' 

[5] PRINT 'AND ANALYSIS OF PERFORMABILITY . AT PRESENT, METAPHOR 
IS CAPABLE ' 

[6] PRINT 'ONLY OF EVALUATING CERTAIN PERFORMABILITY MODELS,' 

C7] PRINT 'THE COMMANDS PRESENTLY AVAILABLE AREi EVAL,HELP, DATA, 
ALTER, CALC,' 

C8] PRINT ' COM, BRIEF 10N\0FF1, ECHO lON\OFFl, AND 

EXIT. ' 

[9] PRINT 'DO YOU WANT MORE HELP?' 

CIO] ft IF NOT, LEAVE 
Cll] -^i-INYES) /O 

C12] PRINT 'THE COMMANDS CAN BE ENTERED AT ANY TIME EXCEPT IN 
RESPONSE TO A ‘ 

C13] PRINT 'YES/NO QUESTION. THE COMMANDS ARE AS FOLLOWS:' 

Cl4] PRINT " 

CIS] PRINT ' EVAL EVALUATE A USER SUPPLIED 

PERFORMABILITY MODEL' 

C 1 6 ] PRINT • » 

Cl7] PRINT ' HELP GIVE MORE INFORMATION ABOUT THE 

QUESTION BEING ' 

Cl 8] PRINT ' ASKED' 

Cl 9] PRINT " 

C20] PRINT ' DATA DISPLAY VARIABLE INFORMATION AND 

MODEL PARAMETERS' 

C21] PRINT " 

C22] PRINT ' ALTER CHANGE VARIABLE INFORMATION AND 

MODEL PARAMETERS' 

C 2 3 ] PRINT ' ' 

C24] PRINT ' CALC ENTER THE APL CALCULATOR MODE. TYPE 

"EXIT" TO LEAVE.' 

C25] PRINT " 

C26] PRINT ' COM ENTER COMMENTS ON THE OUTPUT' 

C27] PRINT " 

C28] PRINT 'BRIEF l0N\0FFl TURN BRIEF OUTPUT ON OR OFF' 

C 2 9 ] PRINT ' ' 

C30] PRINT ' ECHO Z0N\0FF1 TURN INPUT ECHO ON OR OFF' 

C31] PRINT " 

C32] PRINT ' EXIT LEAVE METAPHOR' 

C3 3] PRINT " 

C34] PRINT 'DO YOU WANT REFERENCES?' 

C35] ft LEAVE IF NOT 
C3 6] ^{-INYES'i/O 

C37] PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
ANALYSIS, SEE' 

C 3 8 ] PRINT ' ' 

C3 9] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 
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[40] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SXSTEMS^'^ NASA 
GRANT ' 

[41-] PRINT » NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.’ 

[42] PRINT ” 

[43] PRINT ^FOR FURTHER INFORMATION REGARDING METAPHOR^ SEE' 

[44] PRINT ” 

[45] PRINT ’ J. F. MEIER. "MODELS AND TECHNIQUES FOR EVALUATING 
THE ’ 

[•46] PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[47] PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978,’ 

[48] PRINT ” 

[.49] PRINT 'FOR FURTHER INFORMATION REGARDING APL . SEE' 

[50] PRINT ' ' 

[51] PRINT ' S. PAKIN . ’MPi:\360 REFERENCE MANUAL." SCIENCE 
RESEARCH' 

[52] PRINT ' ASSOCIATES .INC . , CHICAGO. 1972.’ 

[53] PRINT " 

COMMAND FUNCTIONS 


V COMM AND ALTER ; ALTERVECTOR 

[1] fl 

[2] fl ROUTINE FOR CHANGING CURRENT DATA 

[3] fl 

[4] fl GET DATA TO BE ALTERED 

[5] ALTERVECTOR*-GET ALTERVECTOR ■ 

[6] n 

[7] fi CHANGE THAT DATA. EXIT WHEN THROUGH. 

[8] AL00P‘.^ALTERVECT0R/AP .AH .^BASICVARIABLES .AALLACCLEVBLS . 

APRESENTACCLEVEL ,AI .AG .AF .AV .ANUMTRAJSETS 
[ 9 ] ->-0, “ 

[10] ft 

[11] ft 

[12] fi CHANGE THE REQUESTED DATA 
[1 3 ] n 

[14] fi CHANGE TEE P MATRICES 

[15] ^i-^{DEFP~l) / WALTER 

[16] rP MATRICES ARE NOT DEFINED AT THIS' TIME . PRINT ERROR 

MESSAGE • .f'-'. 

[17] PRINT 'P MATRICES ARE NOT DEFINED AT THIS TIME.' 

[18] -*APLOOP 

[19] APALTER: PRINT 'ALTERING P' 

[20] GETPMATRICES 

[21] ^PLOOPiALTERVECTORlIl<-Q 

[22] ^ALOOP 

[23] PI 

[2 4] fl CHANGE P MAT RICE'S 

[25] AH i->{DEFH-l) /.M ALTER 

[26] n'p MATRICES ARE NOT DEFINED AT THIS TIME. PRINT ERROR 
MESSAGE 
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[27] PRINT MATRICES ARE NOT DEFINED AT THIS TIME,* 

[28] ^AHLOOP 

[2 9] AHALTERi PRINT * ALTERING H* 

[30] GETmATRICES 

[31] MLOOPiALTERVECTORl2'\‘<-Q 
[.3 2] -^ALOOP 

[33 ] n 

[34] fi CHANGE THE TIME-INVARIANT BASIC VARIABLES 

[35 ] ABASICVARlABLESi^i DEFBASICVARIABLES=l) / ^BASICVARIABLESALTER 

[36] , uTIME-INVARIANT BASIC VARIABLES ARE NOT DEFINED AT THIS 

TIME. PRINT ERROR MESSAGE 

[37] PRINT * TIME- INVARIANT BASIC VARIABLES ARE NO.T DEFINED AT THIS 
TIME.* 

[38] -yABASICVARIABLESLOOP 

[39] ABASICVARIABLESALTERiPRINT * ALTERING THE NUMBER OF BASIC 

VARIABLES* 

[40] GETNUMBASICVARIABLES 

[41] GETBASICVARIABLES 

[42 ] ABASICVARIABLESLOOPiALTERVECTORlZ >0 

[43] -^^LOOP 

[44] n 

[45] n CHANGE ALL' ACCOMPLISHMENT LEVELS 

[46] AALLACCLEVELS:-^{.DEFNVMACCLEV-1) / AALLACCLEVELSALTER 

[47 ] nTHE ACCOMPLISHMENT LEVELS ARE NOT DEFINED AT THIS 
TIME. PRINT ERROR MESSAGE 

[48] PRINT *THE ACCOMPLISHMENT LEVELS ARE NOT DEFINED AT THIS 
TIME. ' 

[49] -^^ALL ACC LEV EL SLOOP 

[50] MLLACCLEVELSALTERzPRINT * ALTERING THE NUMBER OF ACCOMPLISHMENT 

LEVELS* 

[51] GETNUMACCLEV 

[52] GETACCLEVPROB 

[ 53 ] AALLACCLEVELSLOOPtALTERVECTORim^Q 
[54] ^ALOOP 
[.55] fl 

[56] fl CHANGE JUST THE PRESENT {LAST) ACCOMPLISHMENT LEVEL 
[57 ] £PRESENTACCLEVEL:->-{DEFACCLEVEL = l) /^PRESENTACCLEVELALTER 

[58] ACCOMPLISHMENT LEVEL IS NOT DEFINED AT THIS TIME. PRINT 
ERROR MESSAGE 

[59] PRINT *AN ACCOMPLISHMENT LEVEL IS NOT DEFINED AT THIS TIME * 

[ 60 ] -^£PRESENTACCLEVELLOOP 

[61] ^PRESENTACCLEVELALTERzPRINT * ALTERING THE PRESENT 

ACCOMPLISHMENT LEVRL* 

[62] PERF0RMABILITYlL2-<rGETACCLEVPR0B L 

[ 63 ] ^RESENT ACCLEVELLOOPz ALTERVECT0RX.L~^^^ 

['64 ]• -^ALOOP 

[65] ft 

[66] ft. CHANGE THE J VECTOR 

[67] Ah->-{DEFI=l)/AI ALTER 

[68] flj VECTOR IS NOT DEFINED- AT THIS TIME. PRINT ERROR MESSAGE 

[69] PRINT »J VECTOR IS .NOT DEFINED AT THIS TIME.* 

[70] -^AILOOP 
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[71] ±IALTERiPRINT 'ALTERING THE I VECTOR' 

[72] GET^V ECTOR 

[73] AXLOOPiALTERVECTORZGl^O 

[74] -*ALOOP 

[75] q 

[76] fl CHANGE THE £ MATRICES 

[77] ; AG:^iDEFG=i)/AGALTER 

[78] fl£ MATRICES ARE NOT DEFINED AT THIS' TIME. PRINT ERROR 
MESSAGE 

[79] PRINT 'G_ MATRICES ARE NOT DEFINED AT THIS TIME.' 

[80] -*AGL00P 

;[81] ^G ALTER'. PRINT 'ALTERING THE G MATRICES' 

't82-.] G^GETGMATRICES 
. ['SS'] MLOOFiALTERVECTORlll^Q 
[-84] -^ALOOP 
• i 85 ] q 

[86] n CHANGE THE £ VECTOR 

[87] ±Fi-^(.DEFF=l) / WALTER 

[88] - VECTOR IS NOT DEFINED AT THIS TIME. PRINT ERROR MESSAGE 

[890 'PRINT »£ VECTOR IS NOT DEFINED AT THIS TIME.' 

[900 -^MLOOP 

[■91] AF ALTER'. PRINT 'ALTERING THE F VECTOR' 

[92] F^GETFVECTOR 

[93] AFLOOP'.ALTERVECTORlSl^O 

[94] ■* ALOOF 
[95 ] p 

[96] fl CHANGE THE TIME-INVARIANT BASIC VARIABLE VECTOR 

[97] M'.^{DEFV=1)/ WALTER 

[98] f\THE TIME-INVARIANT BASIC VARIABLE VECTOR IS NOT DEFINED AT 
THIS TIME. PRINT ERROR MESSAGE 

[99] PRINT 'THE TIME-INVARIANT BASIC VARIABLE VECTOR^IS NOT DEFINED 
AT THIS TIME. ' 

[10 0] -^AVLOOP 

tlOllM ALTER: PRINT 'ALTERING THE V VECTOR' 

[102] V-^GETVVALUES 

[10 3 1ML00P : ALTERVECTOR [ 9 ]-«-0 

[104] ^ ALOOF 

[105] n 

[106] fl CHANGE THE NUMBER OF TRAJECTORY SETS BEING CONSIDERED 
[10 7 ']MUMTRAJ SETS '.-^iDEFNUMTRAJ SETS-= 1 ) / ANUMTRAJSETS ALTER 
[108] rTHE NUMBER OF TRAJECTORY SETS IS NOT d'EFINED' AT THIS 

TIME. PRINT ERROR MESSAGE. 

[10 9] PRINT 'THE NUMBER OF TRAJECTORY SET,S JS N'o\'T 4,:DEFINED AT THIS 
TIME.' %l\ 

ZllOlANUMTRAJSETSALTER'.PRINT .'ALTERING THE NUMBER OF TRAJECTORY 
SETS '■ 

[111] NUMTRAJ SET S'^GETNUMTRAJ SETS 

[112] ALTERVECTORllQl'^0 

[113] ^ ALOOF 
7 
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ill 

I2l 

[3] 

[4] 
IBI 
C6] 
171 
[83 


Cl] 

C2] 

C3] 

[4] 

C5] 

E6] 

C7] 

C83 

C9] 


Cl] 

C2] 

[33 

C43 

C53 

[63 

[73 

[83 

[93 

[103 


[13 
[23 
[3 3 
[43 
[53 
[63 
[73 

[83 


7 COMMANDS RJEF SWJTCS 

fl ROUTINE FOR TURNING THE BRIEF SNITCH ON AND OFF. ON 

METAPHOR TO USE A TERSE FORM OF OUTPUT, 'OFF^ CAUSE THE 
NORMAL FULL OUTPUT. 

fi TURN SWITCH ON IF REQUESTED , ELSE TURN SWITCH OFF. 

f B,TEF swipes 

^ BRIEF * I SWITCH 


V COMMANDO ALCi CCALCI NPUT 

fi routine to UTILIZE THE 
METAPHOR PACKAGE. 

n Walts when the input 
0 

CCALCINiB^iPRINTQUAD ’?’) 
U-^-CCA LCINPUT*-U 
n LEAVE IF EXIT SPECIFIED. 
■^il^/>^lCCALCINPUT=EXIT'i/0 
■^ C CALC I N 
V 


APL CALCULATOR MODE FROM THE 
IS NULL. 

ELSE GET NEXT CALCULATION. 


V COMMANDC OM ; CCINPUT 

fi ROUTINE FOR ALLOWING THE USER TO PRINT A COMMENT 
B EACH COMMENT IS PRECEDED BY ’***» AND THIS 

fi HALTS WHEN THE INPUT IS NULL 

ft 

ft PRINT PROMPT SYMBOLS 
COIN tE*-iPRINTQUAD »***») 

COIN PUT*'i!l 

~IF COMMENT NOT EMPTY ^ GET NEXT COMMENT. ELSE LEAVE. 
•^{Z^qCCINPUT) /COIN 

V 


V COMMANDS AT A ; DATAVECTOR 

ft ROUTINE FOR DISPLAYING CURRENT DATA 
ft 

R GET DATA TO EE DISPLAYED 
datavector*-getdatavector 

ft DISPLAY THAT DATA. EXIT WHEN THROUGH. 

DLOOP-.-^DATAVECTOR/DNUMPHASES ,DNUMSTMES ,DP,DH.D_NUmASICVAR 
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^ASICV ARIABLES y^UMACCLEV yBmJMTRAJSETS tDI ,DG ,DF ,DV ,DPERF 
C 9 ] ■*•0 

[10] a 
[11 ] a 

[12] a SHOW TUB REQUESTED INFORMATION 

[13] a 

[14] m UM PRASES ; ^ ( DEFN UMPHASES= 1 ) /DN UM PHASE SO UT 

[15] PRINT ^NUMBER OF PEASES HAS NOT BEEN DEFINED^ 

[16] -^^UMPEASESLOOP 

[17] mi VMPHASE SO {PRINT QUAD ^NUMBER OF PHASES IS ' ) iPRINTQUAD 

HUMPH ASES) 

[18] PRINT ' » 

[19] mUMPHASESLOOPiDATAVECTORlX'S-*-0 

[20] -^DLOOP 

[21] a 

[22] DNUMSTATES:^{DEFNUMSTATES=1 ) / MUMSTATESOUT 

[23] PRINT ^NUMBER OF STATES HAS NOT BEEN DEFINED' 

[24] -»-^UM ST ATE SLOOP 

[25] miUMST ATE SO UTi^-*-{ {PRINT QUAD 'NUMBER OF STATES PER PHASE IS- 

' ) ; PRINT QUAD STATESPERPHASE) 

[26] PRINT ' ' 

[27] DNUMSTATESLOOP:DAT.AVEOTOR-[2 1^0 
[2 8] ^moop 

[29] a 

[30] ^i-y{DEFP~l) /^OUT 

[31] PRINT 'P MATRICES RAVE NOT BEEN DEFINED' 

[ 32 ] ^^LOOP 

[33] DPOUTiPRINT 'THE P MATRICES AREi' 

[34] P 

[35] ^LOOPiDATAVECTORlZl-^-Q 

[36] -^DLOOP 

[37] a 

[38] D_Si^{DEFE=l) /mOUT 

[39] PRINT '^MATRICES HAVE NOT BEEN DEFINED' 

[40] -^DHLOOP 

[41] mOUTi PRINT 'THE H MATRICES ARE:' 

[42] H 

[43] DHLOOPiDATAVECTORZm-i-Q 

[44] -^moop 
[45 ] a 

[46] 9NUMBASICVARIABLES:{ 

DEFNUMBASICVARIABLES^^X) /DNUMBASICVARIABLESOUT 

[47] PRINT 'THE NUMBER OF BASIC VARIABLES HAS NOT BEEN DEFINED' 

[4 8] -^DNUMBASICVARIABLESLOOP 

[49] ^UMBASICV ARIABLES0UT:7\-^{{PRINTQUAD 'THE NUMBER OF TIME- 

INVARIANT BASIC VARIABLES IS ') \PRINTQUAD NUMB ASICV ARIABLES) 

[50] PRINT " 

[51] DNUMBASICVARIABLESLOOP: DATAVECT0Rl5l-*-Q 

[52] -*DLOOF 

[53] a 

[54] DBASICV ARIABLES:^{DEFB ASICV ARIABLES=X)/DBASICVARIABLESOUT 

[55] PRINT 'THE TIME-INVARIANT BASIC VARIABLES HAVE NOT BEEN 
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DEFINED^ 

C56] -^^BASICVARIABLESLO.OP 

[57] DBASICVARIABLESOUTiPRINT ^TSE TIME-INVARIANT BASE VARIABLES 

HAVE PROBABILITIES', » 

[58] BASICVARIABLES 

[59] ^ASICVARIABLESLOOPxI)ATAVECTORl^'\-^(i 

[60] -^DLOOP 
[ 61 ] n 

[62] mUMACCLEV i-*{VEFNUMACCLEV=l) / DNUMACCLEVOUT 

[63] PRINT *THE NUMBER OF ACCOMPLISHMENT LEVELS NOT DEFINED^ 

[64] -^DNUMACCLEVLOOP 

[65] DNUMACCLEVOUT’.Q-^iiPRINTQUAD ^ THE NUMBER OF ACCOMPLISHMENT 

LEVELS IS *)iPRINTQUAD NUMACCLEV) 

[ 66 ] PRINT »» 

[67] DNUMACCLEVLOOP: DATAVECT0RL7 1-<^Q 

[ 68 ] ^DLOOP 

[69] n 

[70 ] DNUMTRAJSETS:-*(DEFNUMTRAJSETS=l)/DNUMTRAJSETSOUT 
[71] PRINT ^THE NUMBER OF TRAJECTORY SETS NOT DEFINED' 

[ 72 ] '^mUMTRAJ SET SLOOP 

[73] DN UMTR A J SETS OUT '.PRINT 'THE NUMBER OF TRAJECTORY SETS IS'.' 

[74] NUMTRAJSETS 

[75 ] DNUMTRAJSETSLOOP'.DATAVECTORl^l^Q 

[76] ^DLOOP 

[77] n 

[78] pi:'^(DEFI=l)/DIOUT 

[79] PRINT »J VECTOR NOT DEFINED' 

[80] -^DILOOP 

[81] ^IOUT'.^^(^{PRINTQUAD 'THE INITIAL VECTOR IS ' ) iPRINTQUAD I) 

[82] PRINT " 

[8'3] ^IL00P'.DATAVECT0Rl9l-<-Qi 

[84] -*^LOOP 

[85] fi 

[ 86 ] DG'.^(,DEFG=-1) /DGOUT 

[87] PRINT 'G MATRICES NOT DEFINED' 

[ 88 ] -^DGLOOP 

[89] mo UT '.PRINT 'THE G MATRICES ARE'.' 

[90] G ~ 

[91] mLOOP'.DATAVECTORllQ 2''-0 

[92] -*DLOOP 

[93] fi 

[94] m'.^{DEFF=l) /mOUT 

[95] PRINT 'F^ VECTOR NOT DEFINED' 

[96] ->-mL00P 

[97] mO-UT'.]!\-*-(^{PRINTQ.UAD 'THE FINAL VECTOR IS ' ) iPRINTQUAD F) 

[98] PRINT " 

[99] DFLOOP'.DATAVECTORllll^O 

[ 100 ] -^DLOOP 

[ 101 ] 

[10 2 ]£F : ^ ( DEFV= 1 ) /MO UT 

[103] PRINT 'THE TIME-INVARIANT BASIC VARIABLE VECTOR NOT- DEFINED' 

[104] -^DVLOOP 
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llQZlDyOUTi\!\-*r{{PRlETQUAD 'THE TIME-INVARIANT BASIC VARIABLE VECTOR 
IS ' )iPRINTQUAD V) 

CIO 6] PRINT »» 

L107 3DVLOOP:DATAVECTORZ121-^0 
[10 8] -^DLOOP 
[109] fl 

lllOl^ERFi-*iDEFPERFORMABILITY=l) /^ERFOUT 

[111] PRINT 'PERFORMABILITI NOT DEFINED' 

[112] -^DPERFLOOP 

lll3lDPERF0UT:Ui^({PRINTQUAD ' THE PERFORMABILITI IS ')\PRINTQUAD 
PERFORMABILITI) 

Zll'\r'\^ERFL00P’.DATAVECT0RZlZ']-^Q 
[115] -^DLOOP 
7 


V- COMMANDECHO SWITCH 
Cl] a 

[2] fl ROUTINE FOR TURNING THE ECHO SWITCH ON AND OFF, 'ON' 

CA USES 

n METAPHOR TO REPEAT EVERY INPUT LINE. 'OFF' SUPPRESSES 

THE REPETITION . 

[4] R 

[5] B TURN SWITCH ON IF REQUESTED , ELSE TURN SWITCH OFF. 

[6] ECH0INPUT^^/'0N' eSWITCH 

[7] 'ECHO '% SWITCH 
V 


7 COMMANDEVAL 

[1] R 

[2] H PERFORMABILITI COMPUTATION PORTION OF METAPHOR 
[3 ] fl 

[4] B FETCH THE MATRICES REQUIRED FOR PERFORMABILITI 
CALCULATIONS 
[ 5 ]■ mNUMP ; GETN UMPHASES 
[ 6 ] GET STATES 

[ 7 ] GETmATRICES 

[ 8 ] GETmATRICES 

[9] GETNUMBASICVARIABLES 
CIO] GETBASICVARIABLES 

[11] GETN UM ACC LEV 

[12] fl 

[13] fl FOR EACH ACCOMPLISHMENT LEVEL ^ FETCH THE TRAJECTORY SETS 
AND CALCULATE THEIR PROBABILITIES 

[14] GETPERFORM ABILITY 

[ 1 5 ] fl 

[16] fl PRINT THE RESULTING PERFORMABILITI 

[17] PRINTPERFORM ABILITY 
7 
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7 COMMAmUELP ROVTIEE 

Cl] fl 

[2] R ROUTINE PRINTING HELP INFORMATION 

[3] fl 

[4] n GET TEE PROPER INFO ROUTINE 

C 5 ] ^{RO UTINE^ \ NUMRELPRO UTINES ) / HGNP , EGS ^ BGPM , RGG ^ 

HGN . RGB . RGRM , RGNBV , RGBV , RGNA , HGIV . 

RGGM ,RGFV ,RGVV ,HGNTS ,RGAV ,BGDV ,RMET 

C6] n 

[7]" R 'GET NUMBER OF PRASES' HELP 
C 8 ] BGNP : GNPINFO 
C9] ^0 

ClO] n 

Cll] R 'GET STATES' HELP 
Cl 2] HGS ! GSINFO 
Cl3] -►O 
Cl4] n 

Cl 5] R ' GENERATE P^ MATRIX' HELP 
Cl 6 3 RGPM i GPMI NFO 
Cl7] -►O 
CIS] fl 

Cl 9] fl 'GET GIVEN MATRIX' HELP 
C20] HGG ; GGINFO 
C21] *>0 

C22] fl 

C23] fl 'GET NFAIL MATRIX' HELP 
C24] RGNiGNINFO 
C25] ->0 

C26] fl 

C27] fl 'GET BEEF AIL MATRIX' HELP 
C28] RGB ; GBINFO 
C29] ^0 

C30 ] fl 

C31] fl 'GENERATE MATRIX' HELP 
C32] RGRM ; GRMI NFO 
C33] ->-0 

C34] fl 

C35] fl 'GET NUMBER OF TIME- INV ARI ANT BASIC VARIABLES' HELP 
[36 : RGNBV i GNBV I NFO 
C37] -^0 

C38] fl 

C39] fl 'GET TIME-INVARIANT BASIC VARIABLES' HELP 
[40] RGBV ; GBVI NFO 
C41] ^0 

[42] fl 

[43] fl 'GET NUMBER OF ACCOMPLISHMENT LEVELS' HELP 

[44] HGNAxGNAINFO 

[45] ^0 
[ 46 ] a 

[47] fl 'GET I VECTOR' HELP 

[48] RGIV i GIVI NFO 

[49] 
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[50] n 

[51] fl 'GET G MATRIX' HELP 

[52] HGGMiGGMINFO 

[53] -»-0 

[54] PI 

[55] n 'GET F VECTOR' HELP 

[56] UGFV ; GFVINFO 

[57] ^0 

[58] ft 

[5 9] ft 'GET V_ VECTOR' HELP 

[60] HGVV ; GW I NFO 

[61] ->-0 
[62 ] ft 

[63] ft 'GET NUMBER OF TRAJECTORY SETS' HELP 

[64] HGNTS'.GNTSINFO 

[65] ->-0 
[ 66 ] ft 

[67] ft 'GET ALTER VECTOR VECTOR' HELP 

[68] HGAV X GAVI N FO 

[59] ->-0 

[70] ft 

[71] ft 'GET DATA VECTOR VECTOR' HELP 

[72] HGDV iGDVINFO 

[73] ->0 

[74] ft 

[75] ft ' METAPHOR ' HELP 

[76] HMETx MET INFO 

[77] ^0 
7 


COMMAND SUPPORT FUNCTIONS 


7 Z-t-BRIEF SWITCH 

[1] ft 

[2] ft ROUTINE TO INPUT THE BRIEF COMMAND 
[3 ] ft 

[4] ft RETURN THE VALUE 

[ 5 ] Z^' BRIEF ' , SWITCH 

7 


7 Z-^ECHO SWITCH 

[1] ft 

[2] ft ROUTINE TO INPUT THE ECHO COMMAND 
[ 3 ] ft 

[4] ft RETURN THE VALUE 

[5] Zf-'ECHO ' y SWITCH 
7 
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V Zf-GETALTERVECTORiGAVINPUT 

Cl] fl 

C2] fi ROUTINE FOR GETTING TEE ALTER VECTOR FOR CHANGING DATA 
C3] n 

C4] fl PRINT EXPLANATION 

C5] GAVI N ‘.PRINT 'PUT AN X BELOW EACH ITEM TO BE CHANGED. HELP 
AVAILABLE. ' 

[6] n GET ALTER REQUESTS, RESHAPING ALONG THE WAX 
C7] PRINT 'P H CONST .BAS .VARS ALL .ACC .LEVELS 
PRESENT .ACC .LEVEL I G F V NUM .TRAJ .SETS' 

C8] GAVI NPUT^QOaiEABQn ' ')) 

[9] fi LOOK FOR HELP REQUEST. IF PRESENT, CALL FOR HELP ROUTINE. 
CIO] HEL P'eGA V IN PUT ) / GAVVECTORSET 

Cll] COMMANDH ELP GAV 
Cl2] -^ GAVI N 

Cl3] fl INITIALIZE ALTER VECTOR 
Cl4] GAV VECTORSET‘.Z*-lQpO 
CIS] fl DETERMINE CHANGE VECTOR 
CIS] ZLll^' X' &GAVINPUTLi:i 
C17] ZLl']^*-' X' e GAVI NPUTZt^l 

Cl9] Zim^i-'X' € GAVI NPUTZ22 + i 14] 

C20] ZZSj-^-'X' eGAVINPUTZ^B + xl7l 
C21] ZZ63‘<^' X' €GAVINPUTZ581 

C22] ZZ7l->-' X' eGAVINPUTZSll 

C23] ZZSl-^'X' eGAVINPUTZSi^l 
C24] ZZSl^f-'X' eGAVINPUTZsel 
C25] ZZlOl^^' X' €GAVINPUTZ67+il3l 
7 


Cl] 

C2] 

C3] 

C4] 

C5] 

C6] 

C7] 

C8] 

C9] 

CIO] 

Cll] 

C12] 

C13] 

C14] 

CIS] 


7 GAV I NFO 

PI 


fl ROUTINE GIVING HELP ON CHOOSING THE DATA TO BE DISPLAYED 

Pi 

PRINT 'PLACE AN X BELOW EACH ENTRY IN THE GIVEN LIST WHICH YOU 
WANT TO ' 

PRINT 'CHANGE. THE ABBREVIATIONS ARE AS FOLLOWS'. ' 

PRINT " 


PRINT ' P 

(P) MATRICES' 

PRINT 

PRINT ' H 

{H) MATRICES' 

PRINT " 

PRINT ' CONST .BAS .VARS 

BASIC VARIABLES AND' 

PRINT ' 

PROBABILITIES' 

PRINT " 

PRINT ' ALL. ACC .LEVELS 

MATRICES AND THE' 

PRINT ' 


THE INTRAPHASE STATE TRANSITION 

THE INTERPHASE STATE TRANSITION 

THE NUMBER OF TIME-INVARIANT 
THEIR ASSOCIATED 

USING THE PRESENT H AND P 
PRESENT TIME- INVARIANT BASIC 
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[16] 

Cl7] 

[18] 

[19] 

[ 20 ] 

[ 21 ] 

[ 22 ] 

[23] 

[24] 

[25] 

[26] 

[27] 

[28] 

[23] 

[30] 

[31] 

[32] 

[33] 

[34] 

[35] 

[36] 

[37] 

[38] 

[39] 

[40] 


[41] 

[42] 

[43] 

[44] 

[45] 

[46] 

[47] 

[48] 

[49] 


VARIABLE INEORMATIOR 
PRINT ' 

THE SYSTEM . ’ 

PRINT » 

APPROPRIATE INFORMATION' 
PRINT ' 

LEVELS. ' 

PRINT ' ' 

PRINT ' PRESENT .ACC .LEVEL 
LEVEL ' 

PRINT ' 

CONSIDERATION . ' 

PRINT ' ’ 

PRINT ' j 

PRINT ' ' 


DETERMINE THE PERFORMABILITI OF 
METAPHOR WILL ASK FOR THE 
REGARDING THE ACCOMPLISHMENT 

ALTER ONLY THE ACCOMPLISHMENT 
PRESENTLY UNDER 

INITIAL VECTOR' 


PRINT ' Q 

PRINT ' * 

PRINT ' p 

PRINT ' 

OPERATION IS NOT EXECUTABLE.) 
PRINT ' ' 

PRINT ' Y 

INVARIANT BASIC VARIABLES' 
PRINT ' ' 

PRINT ' NUM .TRAJ .SETS 

SETS DESCRIBING' 

PRINT ' 

CONSIDERATION ' 

PRINT ' ' 

PRINT 'IF AN ITEM IS UNDEFINED 
REQUESTED AN ERROR ' 

PRINT 'MESSAGE WILL BE PRINTED 
SUPPRESED . MORE THAN ' 

PRINT 'ONE ITEM MAY BE CHANGED 
COMMAND . ' 

PRINT ' EXAMPLE i' 

PRINT ' ' 


CHARACTERISTIC MATRICES' 

CHARACTERISTIC VECTOR' 

{AT PRESENT, THIS ALTER 

VECTOR CHARACTERIZING THE TIME- 

ALTER THE NUMBER OF TRAJECTORY 
THE ACCOMPLISHMENT LEVEL UNDER 

WHEN AN ALTERATION IS 
AND THAT ALTERATION 
WITH A SINGLE ALTER 


PRINT 

7nUM.TrTj%eTS^''^^^^ present. ACC. LEVEL I , 

PRINT 'X X r t 

PRINT ' ' 

fE^HANlll" aIIThYt ^ ^ matrices ARE TO 

........... X. X.. ™ 

Tg?iN''^'^ STATES, TYPE END AND BEGIN METAPHOR 


PRINT ' ' 

PRINT 'DO YOU WANT REFERENCES?' 
n LEAVE IF NOT 
-^{-INYES) /Q 
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C503 

[513 

[523 

[533 

[543 

[553 

[563 

[573 

[583 

[593 

[603 
[613 
[623 
[633 
[64 3- 

[653 

[663 


PRINT ^FOR FURTHER INFORMATION ON PERFORM ABILITI MODELING AND 
ANALISIS, SEE^ 

PRINT »» 

PRINT » J, F, MEIER, MODELS AND TECHNIQUES FOR EVALUATING 
THE » 

PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,'^ NASA 
GRANT* 

PRINT » NSG 1306, STATUS REPORT NO. 3. NOVEMBER 1977,' 

PRINT ” 

PRINT *FOR FURTHER INFORMATION REGARDING METAPHOR , 'SEE* 

PRINT * * 

PRINT * J. F. MEIER, ** MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

PRINT » EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,** NASA 
GRANT* 

PRINT * NSG 1306, STATUS REPORT NO. 4. JULY 1978.’ 

PRINT »» 

PRINT *FOR FURTHER INFORMATION REGARDING APL , SEE* 

PRINT * * 

PRINT * S.-PAKIN, »MP£\360 REFERENCE MANUAL ,* * SCIENCE 
RESEARCH* 

PRINT * ASSOCIATES, INC ., CHICAGO, 1972.' 

PRINT • » 

7 


V Z^GETDATA VECTOR ; GDVINPUT 
[13 fl 

[23 ft ROUTINE FOR GETTING THE DATA VECTOR FOR DISPLAYING DATA 
[3 3 ft 

[43 ft PRINT EXPLANATION 

[5 3 GDV I N ’.PRINT *PUT AN X BELOW EACH ITEM TO BE DISPLAYED . HELP 
AVAILABLE. * 

[63 ft GET DATA REQUESTS, RESHAPING ALONG THE WAY 
[73 PRINT *NUM. PHASES NUM. STATES P H NUM .CON ST .BAS y ARS 
PROB . CONST .BAS. VARS * 

[83 GDVI NPUT-*-69p(j]!l,(e2p* ’)) 

[93 rLOOK for help REQUEST. IF PRESENT, CALL FOR HELP ROUTINE 
[103 -»-(~A/» HELP * e GDVINPUT ) / GDV IN CON T 

•[113 COMMANDHELP GDV 
[12 3 -^GDVIN 
[13 3 GDVINCONT ‘.PRINT 

* NUM. ACC .LEVELS NUM .TRAJ .SETS I G F V PERF* 

[143 GDVINPUT’<^119p(^GDVINPUT ,^,{^lp* »)) 

[153 PRINT ** 

[163 f\LOOK FOR HELP REQUEST. IF PRESENT, CALL FOR HELP ROUTINE 
[173 help* e GDVI NPUT ) / GDVV ECTORSET 

[183 COMMANDH ELP GDV 
[19 3 -^GDVIN 

[203 ft INITIALIZE DISPLAY VECTOR 

[213 GDVVECTORSET ’.Z<-lZpO 

[223 ft DETERMINE DISPLAY VECTOR 
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C23] e GDVI NPUTlxlQ 1 

[24] 2[2]-*-» J* e£WIi’/Pi/2'[l2 + i 10] 

[25] Z[3 ]-^*jf « e GDVI NPUTllS 1 

[2 6] 2-[4]-«->Z* € GDVI NPUTl2^1 

[27] Z[5]-c» J’ eff£7JZ7PPr[30 + il8] 

[28] X* e GDVI NPUTl50 + \l^'\ 

[29] X' e GDVI NPUTl&2+-i 141 

[30] 2C8>>J^ e gPyJ i7PpyC85 + i 13 ] 

[31] 2[ 9 ]-<-»;?» g gpyi i/ppycion 

[32] 2[10]-f-»Z*e gP7J il/PPfCl04] 

[33] Z[ll]f‘»Z»effP7Ji7PP2’i;i0 7] 

[34] Z[12]f-»A'*gCP7Ji7PP5’Cll0] 

[35] Z[l3]-t*»A:’eG:p7Ji7PPyCll2+i4] 
7 


[ 1 ] 

[ 2 ] 

[3] 

[4] 

[5] 

[ 6 ] 

[7] 

[ 8 ] 

[9] 

[ 10 ] 
[ 11 ] 

[ 12 ] 

[13] 

[14] 

[15] 

[16] 

[17] 

[18] 

[19] 

[ 20 ] 

[ 21 ] 

[ 22 ] 

[23] 

[24] 

[25] 

[26] 


7 GDVI NFO 
n 

fi eoutine giving help on choosing the data to be altered 

n 

PrYnT abbreviations are as FOLLOWS:' 


PRINT »' NUM. phases 

PRINT ' ' 

PRINT ' NUM. STATES 

PRINT ' ' 

PRINT » p 

MATRICES ’ 

PRINT * ' 

PRINT > NUM .CONST .BAS .VARS 
BASIC .VARIABLES' 

PRINT » ' 

PRINT 'PROB .CONST .BAS .VARS 
THE TIME- INVARIANT' 

PRINT ' 

PRINT ' » 

PRINT » NUM. ACC .LEVELS 

LEVELS' 

PRINT " 

PRI NT ' nUM. TRA J .SETS 

ASSOCIATED WITH' 

PRINT ' 

CONSIDERATION' 

PRINT ' ' 

PRINT , » j 

TRAJECTORY SET' 

PRINT ' 

PRINT ' ' 

PRINT ' Q 

THE TRAJECTORY' 


THE NUMBER OF PHASES' 

THE NUMBER OF STATES' 

THE INTRAPHASE TRANSITION (P) 

THE NUMBER OF TIME- INV ARI ANT 

THE PROBABILITIES OF EACH OF 
BASIC V^ARIABLES' 

'HE NUMBER OF ACCOMPLISHMENT 

'HE NUMBER OF TRAJECTORY SETS 
THE ACCOMPLISHMENT LEVEL UNDER 

THE INITIAL VECTOR FOR THE 
UNDER CONSIDERATION' 

THE CHARACTERISTIC MATRICES FOR 
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[27] PRINT » SET UNDER CONSIDERATION^ 

[28] PRINT »’ 

[29] PRINT ’ F THE CHARACTERISTIC VECTOR FOR 

THE TRAJECTORY' 

[30] PRINT ' SET UNDER CONSIDERATION' 

[31] PRINT •» 

[32] PRINT ' V THE VECTOR CHARACTERIZING THE 

TIME- INVARIANT ' 

[33] PRINT ' BASIC VARIABLES FOR THE 

TRAJECTORY SET ' 

[34] PRINT ' UNDER CONSIDERATION' 

[35] PRINT '» 

[36] PRINT ' PERF THE PERFORM ABILITY' 

[37] PRINT ' ' 

[38] PRINT 'IF AN ITEM IS UNDEFINED WHEN A DISPLAY IS REQUESTED^ AN 
ERROR MESSAGE' 

[39] PRINT 'WILL BE PRINTED AND THAT DISPLAY WILL BE 
SUPPRESED, MORE THAN ONE ITEM ' 

[40] PRINT 'MAY BE DISPLAYED WITH A SINGLE DATA COMMAND.' 

[41] PRINT ' EX AMPLE X' 

[42] PRINT »• 

[43] PRINT 

'NUM.PHASES NUM. STATES P H NUM .CON ST .BAS .V ARS PROB .CONST .B 

[44] PRINT 'X 

X • X ' 

[45] PRINT 'NUM. ACC .LEVELS NUM .TRAJ .SETS I G F V PERF' 

[46] PRINT 

'XX X 

t 

[47] PRINT " 

[48] PRINT 'THIS INFORMS METAPHOR THAT THE NUMBER OF PHASES. 

STATES, AND ACCOMPLISHMENT' 

[49] PRINT 'LEVELS AS WELL AS THE PROBABILITIES OF THE TIME- 
INVARIANT BASIC VARIABLES' 

[50] PRINT 'AND THE PERFORM ABILITY ARE TO BE^ DISPLAYED . ' 

[51] PRINT " 

[52] PRINT 'DO YOU WANT REFERENCES?' 

[53] fl LEAVE IF NOT 

[54] -*{~INYES) /Q ' 

[55] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[56] PRINT " 

[57] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[58] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT ' 

[59] PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.’ 

[60] PRINT " 

[61] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[62] PRINT " 

[63] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 
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[64] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,^' NASA 
GRANT' 

[65] PRINT » NSG 1306, STATUS REPORT NO. 4, JULY 1978.* 

[66] PRINT ” 

[67] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[68] PRINT »' 

[69] PRINT ' S. PAKIN , »MFL\360 REFERENCE MANUAL SCIENCE 
RESEARCH' 

[70] PRINT ' ASSOCIATES , INC . , CHICAGO^ 1972. » 

[71] PRINT " 

7 

COMMAND EVAL IMPLEMENTATION FUNCTIONS 


V GETNUMPHASES 

[1] fl 

[2] fi 

[3 ] R ROUTINE FOR FETCHING THE NUMBER OF MISSION PHASES 

[4] n 

[5] fl INPUT NUMBER OF PHASES 

[6] PRINT " 

[7] GNPI N '.PRINT 'NUMBER OF PHASES?' 

[8] 1 INPUT GNP 

[9] R CHECK FOR COMMAND 

[10] ^(1=A ^'COMMAND' )/ GNPIN 

[11] fl CHECK VALIDITY OF INPUT 

[12] -^(CHECKPOSI IN) / GNPI N 

[13] fl ELSE SET THE NUMBER OF PHASES AND EXIT 

[14] NUMPHASES'^IN 

[15] DEFN UMPH ASES'f'l 

V 


V GNPINFO 

[1] fl 

[2] fl ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF PHASES 
[3 ] n 

[4] PRINT 'ENTER THE NUMBER OF PHASES IN THE FINITE PHASE MODEL AS 
A SINGLE' 

[5] PRINT 'POSITIVE INTEGER.' 

[6] PRINT 'EXAMPLE',' 

[7] PRINT ' 3' 

[8] PRINT 'THIS INDICATES TO METAPHOR THAT THE MODEL TO BE 
EVALUATED HAS 3 PHASES' 

[9] PRINT 'DO YOU WANT REFERENCES?' 

[10] fl LEAVE IF NOT 

[ 11 ] ^{->INYES)/Q 

[12] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS^ SEE' 

[13] PRINT ' ' 

[14] PRINT • J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
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THE ’ 

ms: PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,'' NASA 

GRANT ’ 

Cl63 PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.’ 

[173 PRINT " 

[183 PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[19 3 PRINT ' ' 

[203 PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[213 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[223 PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

[233 PRINT " 

[243 PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[253 PRINT " 

[263 PRINT ' S. PAKIN , " APL\ZBQ REFERENCE MANUAL," SCIENCE 

RESEARCH' 

[273 PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.’ 

[283 PRINT " 

V 


V GETSTATES 
[13 fl 

[23 R ROUTINE FOR FETCHING TEE NUMBER OF STATES IN EACH PEASE 
[33 fl 

[43 rINPUT number OF STATES AND CHECK VALIDITY 
[53 PRINT » ' 

GS IN '.PRINT 'NUMBER OF STATES PER PHASE? {SPACE BETWEEN EACH 
NUMBER ) ’ 

[73 NUMPHASES INPUT G£ 

[83 R CHECK FOR COMMAND 

[93 ^(Ji7= D/GSIN 

[103 n CHECK FOR POSITIVE INTEGER 

[113 ^ ( CHECKPO SI IN ) !^N 

[123 ft SET STATES AND EXIT 

[13 3 ST A TESPERPHASE'<-IN 

[14 3 MAXNUMSTATES'^^l / STATESPERPHASE 

[153 DEFN UMSTA TES^l 

V 


[13 ft 

[23 ft ROUTINE FOR GIVING HELP ON INPUTTING THE NUMBER OF STATES 
IN EACH PHASE 
[33 ft 

[43 PRINT 'ENTER THE NUMBER OF STATES FOR EACH PHASE IN THE FINITE 
PHASE MODEL . ' 

[53 PRINT 'TYPE A POSITIVE INTEGER FOR EACH PHASE, SEPARATING EACH 
WITH SPACES AND/OR COMMAS.' 

[63 PRINT 'THE NUMBER OF STATES MUST BE A POSITIVE INTEGER.' 

[73 PRINT ' EXAMPLE : ’ 
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[8] PRIl^T » 4 3,5* . 

[93 PEIWT ^THIS INDICATES TO METAPHOR THAT THE FIRST PHASE HAS 4 
STATES, TEE SECOND' 

[103 PRINT 'PHASE HAS 3 STATES, AND THE THIRD PHASE HAS 5 
STATES, ' 

[113 PRINT ' METAPHOR CHECKS TO MAKE SURE TEAT THE NUMBER OF GROUPS 
OF STATES' 

[123 PRINT 'MATCHES THE NUMBER OF PHASES INPUT EARLIER. AN ERROR 
MESSAGE WILL BE' 

[133 PRINT 'PRINTED IF THEY DO NOT MATCH.' 

[143 PRINT 'DO YOU WANT REFERENCES?' 

[15] fl LEAVE IF NOT 

[16] ■*i'-'INYES) /O- 

[173 PRINT 'FOR FURTHER INFORMATION ON PERFORMABILITY MODELING AND 
ANALYSIS, SEE' 

[183 PRINT " 

[19] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[20] PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS *' NASA 
GRANT * 

[213 PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977 * 

[22] PRINT " 

[23] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR SEE' 

[2 4] PRINT " 

[25] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[26] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS '' NASA 
GRANT' 

1271 PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978.* 

[28] PRINT " 

[293 PRINT 'FOR FURTHER INFORMATION REGARDING APL SEE' 

[30] PRINT " 

[313 PRINT ' S. PAKIN , " APL\ZQQ REFERENCE MANUAL," SCIENCE 

RESEARCH' 

[32] PRINT ' ASSOCIATES, INC ., CHICAGO, 1972.' 

[33] PRINT ' * 

V 


V GETPMATRICESiPHASE\NEXTP 

[1] ft “ 

[2] fl ROUTINE FOR INPUTTING THE P MATRICES 

[3] fl 

[4] fl ONE MATRIX FOR EACH PHASE 

[5 ] ft 

[63 n INITIALIZE THE ARRAY OF P MATRICES 

[ 7 ] P^iNUMPHASES ,MAXNUMSTATES ,MAXNUMSTATES) qQ 

[8] PI 

[9] ft INPUT AND CHECK THE P MATRICES 
[103 PRINT " 

[11] PRINT •' 

[12] PRINT 'SPECIFY THE P MATRICES FOR EACH PHASE, 1 PHASE AT A 
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TIME' 

[13] a 
[143 a 

[153 n INITIALIZE PHASE COUNTER 

[163 PHASE^l 

[17 3 GPMPSASEIN t PRINT ’♦ 

[183 ■ {PRINT QUAD ^ PHASE ' ) i iPRINTQUAD PHASE) iPRINTQU AD *l’) 
[193 PRINT »» 

[203 fi GET P MATRIX FOR PHASE 

[213 NBXTP^GENERATEPMATRIX STATESPERPBASEZPHASEl 
[22 3 ft INSERT THE MATRIX INTO THE ARRAI OF MATRICES 
[23 3 PtPHASEi xSTATESFBRPHASElPHASEl ♦ 
i STATESPEEPHASEIPHASEI l^NEXTP 
[243 fi 

[2 5 3 ft INCREMENT ROW COUNTER AND BRANCH IF APPROPRIATE 

[263 PHASE^PHASE + 1 

[273 ^{PHASE-&NUMPHASES) /GPMPHASEIN. 

[283 n ELSE SET P DEFINITION FLAG AND LEAVE 
.[293 DEFP-^1 
V 


7 GETHMATRICESiPHASEiNEXTH 

[1 3 n 

[2 3 ft ROUTINE FOR INPUTTING THE H MATRICES 
[3 3 a 

[43 a ONE MATRIX FOR EACH PHASE 
[53 a 

[6 3 ft IF NO ^ MATRICES, SET H^l AND LEAVE 
[ 7 3 •^{NUMPHASES>2)/GHMMULTIPHASE 
[S3 1 1 ,ipi 

[93 ft INITIALIZE THE ARRAI OF H MATRICES 

[103 GHMM ULTIPHASE:H^{{NUMPHASSS-1 ) ,M ANNUM STATE S , MAXNUMSTATES) pO 
[113 a 

[123 a INPUT AND' CHECK THE H MATRICES 
[13 3 PRIdlT »» 

[143 PRINT »» 

[153 PRINT 'SPECIFI THE H MATRICES FOR EACH PHASE, 1 PHASE AT A 
TIME^ 

[163 a 
[173 a 

[183 a INITIALIZE PHASE COUNTER 

[193 PHASE^2 

[203 GHMPHASEIN i PRINT *» 

[213 Z^-*-{ {PRINT QUAD *PEASE * ) i {PRINTQUAD PHASE-1) i {PRINTQUAD 

' - » ) J {PRINTQUAD PHASE) ; PRINTQUAD » : ’ ) 

[223 PRINT »' 

[233 a GET H MATRIX FOR PHASE 

[243 NEXTH^STATESPERPHASElPHASE-1 IGENERATEHMATRIX 
STATESPERPHASElPHASEl ~ 

[253 a INSERT THE MATRIX INTO THE ARRAY OF MATRICES 
[263 HlPHASE-l ixSTATESPERPHASElPHASE-1 J ; 
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\STATESPERPHASElFHASE'\ l-^r-NEXTH 

[27] a 

[28] n INCREMENT ROW COUNTER AND BRANCH IF APPROPRIATE 
[2 9] PHASE<-PHASE+1 

[30] ■*{ PHASE^NUMPHA SBS ) / GHMPHASEIN 

[31] R ELSE SET H DEFINITION FLAG AND LEAVE 
[3 2] DEFE-<rl 

7 


V GETNUMBASICVARIABLES 

[1] a 

[2] a 

[3] a ROUTINE FOR FETCHING THE NUMBER OF TIME- INV ARI ANT) BASIC 
VARIABLES 

[4] a 

[5] a INPUT NUMBER OF TIME-INVARIANT BASIC VARIABLES 

[ 6 ] PRINT » ' 

GNBV I N i PRINT 'NUMBER OF TIME-INVARIANT BASIC VARIABLES^' 

[8] 1 INPUT GNBV 

[9] a CHECK FOR COMMAND 

[10] ->(1=A 

e 'COMMAND' )/ GNBV IN 

[11] a CHECK VALIDITY OF INPUT 

[12] -^ilN^Q) / GNBVSET 

[13] . -^(CHECKPOSI IN) / GNBV I N 

[14] a ELSE SET THE NUMBER OF TIME-INVARIANT BASIC VARIABLES AND 
EXIT 

[15] GNBV S ET ! NUMBASICV ARIABLES^IN 

[16] DEFNUMBASICVARIABLES^l ■ 

7 


[ 1 ] 

[ 2 ] 

[3] 

[4] 

[5] 

[ 6 ] 

[7] 

[ 8 ] 

[9] 

[ 10 ] 
[ 11 ] 
[ 12 ] 

[13] 

[14] 

[15] 


7 GNBV I NFO 
a 


0 ROUTINE GIVING HELP ON INPUTTING BASIC VARIABLES 
a 

PRINT 'ENTER THE NUMBER OF BASIC V ARIABLES 'WHOSE PROBABILITIES 
REMAIN TIME-INVARIANT' 


PRINT 'THROUGHOUT THE MISSION INTERVAL (.1 .E . , 
TIME- INVARIANT BASIC VARIABLES . ) ' 


THE NUMBER OF 


PRINT 'THE NUMBER SHOULD BE A SINGLE PO SITIV E ,jINTBGER . ' 
PRINT 'EXAMPLE’. ' 


PRINT ' 2 ' 


PRINT 'THIS INFORMS METAPHOR THAT 
VARIABLES ARE CONSIDERED IN THE' 


TWO TIME- INVARIANT BASIC 


PRINT 'MODEL.' 


PRINT ' ' 


PRINT 'DO YOU WANT REFERENCES?' 
a LEAVE IF NOT 
-^{'-INYES) /Q 

PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
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C16.1 

[173 

[183 

[133 

[203 

[213 

[223 

[233 

[243 

[253 

[263 

[273 

[283 

[293 

[303 

[313 


AISALXSIS, SEE^ 


PRINT » » ^ 

PRINT » J. F. MEYER^ "MODELS AND TECHNIQUES FOR EVALUATING 
THE ^ 

PRINT » EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ’ ' NASA 
GRANTS ’ 

PRINT * NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977 » 

PRINT ’ » 

PRINT ^FOR FURTHER INFORMATION REGARDING METAPHOR SEE^ 

PRINT * » 

PRINT » J. F. MEYER ^ "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

PRINT EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 

PRINT ’ NSG 1306, STATUS REPORT NO. 4. JULY 1978 » 

PRINT " 

PRINT ^FOR FURTHER INFORMATION REGARDING APL SEE^ 

PRINT " 

* ’’i4P£\360 REFERENCE MANUAL,^' SCIENCE 

PRINT » ASSOCIATES, INC . , CHICAGO, 1972 » 

PRINT " 


V 


[13 

[23 

[33 

[4 3 

[53- 

[63 

[73 

[83 

[93 

[103 

[113 

[123 

[133 

[143 

[153 

[163 

[173 


V GETBASICVARIABLES 
n 


R ROUTINE FOR FETCHING THE PROBABILITIES OF EACH OF THE 
TIME- INVARIANT BASIC VARIABLES 


fl SEE IF IT IS NECESSARY TO 
•*{NUMBASICVARIABLES=0) /O 
n 


INPUT BASIC VARIABLES 


r\INPUT PROBABILITIES AND CHECK VALIDITY 
PRINT »» 

G^IN '.PRINT ^PROBABILITIES OF EACH TIME- INVARIANT 
VARIABLE? {SPACE BETWEEN EACH NUMBER)' 

NUMBASICV ARIABLES INPUT GBV 

fl CHECK FOR COMMAND 

-^(1 = A e 'COMMAND' )/ GBV I N 

n CHECK FOR PROPER PROBABILITY MAGNITUDE 

^{CHECKPROB IN) / GBV I N 

n SET BASIC VARIABLE PROBABILITIES AND EXIT 
BASICV ARIABLES-*-IN , 1-IN 
DEFBASICVARIABLES^l 


BASIC 
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[13 PI 

[23 fl ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF BASIC 

VARIABLES 
[3 3 n 

[43 PRINT CENTER THE PROBABILITIES OF THE BASIC VARIABLES WHOSE 
PROBABILITIES REMAIN CONSTANT' 

[53 PRINT 'THROUGHOUT THE MISSION INTERVAL (I ,E . , THE NUMBER OF 

TIME-INVARIANT BASIC VARIABLES,)' 

[63 PRINT 'THE PROBABILITIES SHOULD BE ENTERED AS A ROW OF 

POSITIVE NUMBERS' 

[73 PRINT 'BETWEEN ZERO AND ONE, INCLUSIVE. THE NUMBERS SHOULD 
BE' 

[83 PRINT 'SEPARATED BY SPACES AND/OR COMMAS. THE ORDER OF THE 

NUMBERS SHOULD' 

[93 PRINT 'CORRESPOND TO THE ORDER OF THE TIME- INV ARIANT BASIC 

VARIABLE VECTORS' 

[103 PRINT 'WHICH WILL BE ASKED FOR LATER.' 

[Ill PRINT 'EXAMPLE’.' 

[123 PRINT ' .2, 0.3 .4,0.1’ 

[133 PRINT 'THIS INFORMS METAPHOR THAT THE PROBABILITIES OF THE 

FOUR TIME- INV ARIANT' 

[14] PRINT 'BASIC VARIABLES ARE 0.2, 0.3. 0.4, AND 0.1 

RESPECTIVELY . THE NUMBER' 

[153 PRINT 'OF TIME- INV ARIANT VARIABLES DECLARED EARLIER MUST HAVE 

BEEN FOUR OR AN' 

[16] PRINT 'ERROR MESSAGE WILL RESULT.' 

[173 PRINT " 

[183 PRINT 'DO YOU WANT REFERENCES?' 

[193 fi LEAVE IF NOT 
[203 ^{-INYES) /Q 

[21] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[223 PRINT " 

[233 PRINT ’ J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[243 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[25] PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.’ 

[263 PRINT ' ' 

[273 PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[283 PRINT ' ' 

[293 PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[303 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[313 PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

[323 PRINT ” 

[33] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[343 PRINT " 

[35] PRINT ' S. PAKIN , "APL\360 REFERENCE MANUAL," SCIENCE 

RESEARCH ' 
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C36] PRIWT » ASSOCIATES , INC . ^ CHICAGO^ 1972.' 

[37] PRINT " 

V 


V GETNUMACCLEV 
Cl ] H 

[2] fl 

[3] fl ROUTINE FOR FETCHING THE NUMBER OF MISSION ACCOMPLISHMENT 
LEVELS 

[4] fl 

[5] R INPUT NUMBER OF ACCOMPLISHMENT LEVELS 
C 6 ] PRINT * » 

[7] GN AI N '.PRINT ^NUMBER OF ACCOMPLISHMENT LEVELS?' 

[8] 1 INPUT GNA 

[9] fi CHECK FOR COMMAND 
CIO] ^(1=A 

e 'COMMAND' )/ GNAI N 
Cll] R CHECK VALIDITY OF INPUT 
Cl2] -^iCHECKPOSI IN) / GN AI N 

[13] fl ELSE SET THE NUMBER OF ACCOMPLISHMENT LEVELS AND EXIT 

[14] NUMACCLEV'<-IN 

[15] DEFNUMACCLEV^l 

V 


V GNAINFO 

[1] ft “ 

[2] n ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF 
ACCOMPLISHMENT LEVELS 

[3] . ft 

[4] PRINT 'ENTER THE NUMBER OF ACCOMPLISHMENT LEVELS FOR THIS 
MODEL AS A SINGLE POSITIVE INTEGER.' 

[5] PRINT 'EXAMPLE'.' 

[6] PRINT ' 5' 

[7] PRINT 'THIS INDICATES TO METAPHOR THAT THE MODEL IT IS 
EVALUATING HAS 5 ACCOMPLISHMENT LEVELS.' 

[ 8 ] PRINT ' ' 

[9] PRINT 'DO YOU WANT REFERENCES?' 

[10] ft LEAVE IF NOT 

[ 11 ] ^(.-INYES) /Q 

[12] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[13] PRINT »■» 

[14] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[15] PRINT ' EFFECTIVENESS -OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT' 

[16] PRINT ' NSG 1306, STATUS REPORT NO . 3, NOVEMBER 1977.' 

[17] PRINT " 

[18] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

Cl9] PRINT " 
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[ 20 ] 

[ 21 ] 

[ 22 ] 

[23] 

^2^rl 

[25] 

[26] 

[27] 

[28] 


[ 1 ] 

[ 2 ] 

[3] 

[4] 

[5] 

[ 6 ] 

[7] 

[ 8 ] 

[9] 

[ 10 ] 
[ 11 ] 
[ 12 ] 

[13] 

[14] 

[15] 

[16] 

[17] 

[18] 

[19] 

[ 20 ] 


PRINT ' J. F. MEIER, ^'MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

PRINT ’ EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,'^ NASA 
GRANT » 

PRINT » NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

PRINT ’ » 

PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

PRINT ' ' 

PRINT ' S. PAKIN, "APL\360 REFERENCE MANUAL," SCIENCE 
RESEARCH ' 

PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.* 

PRINT ' ' 


V GETPERFORM ABILITY', LEV ELPROB%L 

Pi 

ft ROUTINE FOR COMPUTING THE PERFORU-ABILITY OF THE SYSTEM 

Pi 

n INITIALIZE THE PERFORM ABILITY VECTOR AND SET DEFINITION 
FLAGS 

PERFORM ABILITIi-NUMACC LEV pO 
DEFACCLEVEL-^1 
DEEPER FORMAB IL IT 7-<-l 
Pi 

n LOOP THROUGH EACH ACCOMPLISHMENT LEVEL 

Pi INITIALIZE LEVEL COUNTER 

i-*-l 

n GET THE PROBABILITY OF EACH ACCOMPLISHMENT LEVEL 
GPLOOPx LEV E L PRO B'<- GET ACC LEV PR on L 
fi INSERT THE PROBABILITY INTO THE PERFORM ABILITY VECTOR 
PERFORM ABILITYiLl-i-LEVELPROB 

fi INCREMENT THE LEVEL COUNTER AND BRANCH IF NECESSARY 
L'<-L+l 

^iLsNUMACCLEV) / GPLOOP 

R ELSE EXIT ROUTINE, SETTING DEFINITION FLAG 
DEFACCLEVEL'^Q 
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MATRIX GENERATOR FUNCTIONS ■ 


V Z-*-M GENERATSmATRIX N\ TYPE-IN 

Cl] fi 

C2] fl 

C3] fi ROUTINE FOR SUPERVISING THE CONSTRUCTION OF THE H MATRIX 
FOR THE GIVEN PHASE 

[4] fl THE MATRIX IS TO HAVE SHAPE M>^N 
C5] n 

[6] n GET TYPE OF MATRIX 
C 7 ] PRINT ’ » 

C8] GENHMI N’. PRINT 'WHAT TYPE OF H MATRIX?' 

[9] 8 INPUT GHM 

CIO] n CHECK FOR COMMAND 
Cll] ->-'(l = A e'COMMAND' )/ GENHMIN 
Cl 2] fl CHECK FOR TYPE 

C13 ] -»-( ^/HMATRIXLISTe.iIN) ) ! GEN HM GIVEN ,GENHMID ENTITY 

Cl 4] fi ELSE ILLEGAL TYPE 

Cl 5] PRINT 'ILLEGAL H MATRIX TYPE. TYPE HELP FOR INFORMATION' 

C 1 6 ] ■* GENHMIN 

Cl7] fl 
Cl 8] fl 

Cl 9] n USER WILL GIVE H MATRIX VALUES 

C2 0] GENHMG IVEN:Z-<^M' GGIVEN N 

C21] ->0 

C22] fl 

C23] fl 

C24] ft IDENTITY MATRIX GENERATOR 

C25] ft FIRST CHECK TO MAKE SURE AN IDENTITY MATRIX IS APPROPRIATE 
HERE 

C26] GENHMI DENTITY i^{M=N) / GENHMI DENTITYGET 

C27] PRINT 'THESE TWO PHASES DO NOT HAVE THE SAME NUMBER OF 
STATES. ' 

C28] PRINT 'AN IDENTITY MATRIX IS INAPPROPRIATE FOR THE INTERPHASE 
TRANSITION MATRIX . ' 

C29] GENHMI N 

C30] GENHMI DENTITYGET'. Z-^GIDENTITY N 
C31] ->“0 

V 


V GHMINFO 
Cl] ft 

C2] ft ROUTINE GIVING HELP ON INPUTTING GIVEN H MATRICES 
C3] ft 

C4] PRINT 'TYPE ONE OF'. GIVEN, IDENTITY' 

C5] PRINT 'DO YOU WANT MORE HELP?' 

C6] LEAVE IF NO MORE HELP WANTED 
C7] ^{-INYES) /Q 

C8] PRINT 'ENTER ONE OF THE FOLLOWING TYPES FOR THE INTERPHASE 
TRANSITION (£) MATRIX'.' 
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[93 

[103 

[113 

[123 

[133 

[143 

[153 

[163 

[173 

[183 

[193 

[203 

[213 

[223 

[233 

[243 

[253 

[263 

[273 

[283 

[293 

[303 

[313 

[323 

[333 

[343 

[353 

[363 


YOU WILL IWPUT AN g MATRIX, ONE ROW AT 


PRINT »» 

PRINT ’ GIVEN 

A TIME . ' 

PRINT ' » 

IDENTITY METAPHOR WILL GENERATE AN H MATRIX 
ASSUMING TEE MATRIX^ ~ 

sVats cba«gs< sbfrssests a system a mics there is eo 

PRINT » BETWEEN PHASES. THUS, METAPHOR 

GENERATES AN IDENTITY MATRIX.' — - 

PRINT ' » 

PRINT ' ' 

PRINT 'BO YOU WANT REFERENCES?' 

R LEAVE IF NOT 
■*{~INYES) /Q 

further INFORMATION ON PERFORM ABILITY MODELING AND 

ANAIiXSXS ^ 
pEimT » * 

P- MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

TH E ’ 

* effectiveness OF AIRCRAFT COMPUTING SYSTEMS," NASA 

GRANT' >■ 

PRINT '• 1306, STATUS REPORT NO. 3, NOVEMBER 1977 .’ 

further information REGARDING METAPHOR , SEE' 

"MODELS AND TECHNIQUES FOR EVALUATING 

J.U s ^ 

* ^^^^^^^FENESS of aircraft COMPUTING SYSTEMS,'' NASA 

GRANT ’ ’ 

PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 ’ 

PRINT " , 

PRINT 'FOR FURTHER INFORMATION REGARDING APL SEE' 

PRINT ' ' 

FAKIN , ”i^Pi;\360 REFERENCE MANUAL," SCIENCE 

t(a btfARC H ^ 

PRINT ' ASSOCIATES, INC ., CHICAGO, 1972 ' 

PRINT ' ' 


7 Z-^GENERATEmATRIX N\ TYPE', IN 
[13 a 
[2 3 a 

[3 3 a ROUTINE FOR SUPERVISING THE CONSTRUCTION" OF THE- P MATRIX 
FOR THE GIVEN PHASE ' 

[43 a THE MATRIX IS TO HAVE SHAPE N^N 
[53 a 

[63 a GET TYPE OF MATRIX 

[73 PRINT ' ' 

[83 GENPMI N ; PRINT 'WHAT TYPE OF P MATRIX‘S' 

[93 8 INPUT GPM 
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[10] fi CHECK FOB COMMAND 

[11] -»-(l=A 

e 'COMMAND' )./ GENPMI N 

[12] n CHECK FOR TYPE 

[13] ^{^/mATRIXLISTe.{ 

IN)) /GENPMGIVEN ^GENPMDEDFAIL ,GENPMNFAIL .GENPMIDENTITY 

[14] fl ELSE ILLEGAL TYPE 

[15] PRINT 'ILLEGAL P MATRIX TYPE. TYPE HELP FOR INFORMATION' 

[16] GEN PM I N 

[17] fl 

[18] n 

[19] ft USER WILL GIVE P MATRIX VALUES 

[20] GENPMG IVENi Z^N GGIVEN N 

[21] ->0 
[22] PI 
[23 ] fl 

[24] R DEDICATED COMPONENT SYSTEM 

[25] GENPMD EDFAIL ; Zj-GDEDFAIL N 

[2 6] ft IF ROUTINE FAILED^ GO BACK TO TRY AGAIN. ELSE EXIT 
ROUTINE 

[27] -»•( (Z[l ;1]<0 ) yl)/ GENPMI N ,0 

[28] n 

[29] fl 

[30] a N GROUPS OF COMPONENTS SYSTEM 

[31] GENPMN FAIL ; Z^GNFAIL N 

[32] ^0 

[33] n 

[34] *fl 

[35] R IDENTITY MATRIX GENERATOR 

[36] GENPMI DENTITYi Z^GIDENTITY N 

[37] -^0 
V 


7 GPMINFO 

[1] fl 

[2] fl ROUTINE GIVING HELP ON INPUTTING P MATRICES 

[3] fl 

[4] PRINT 'TYPE ONE OFi GIVEN ^ DEDFAIL , NFAIL, IDENTITY' 

[5] PRINT 'DO YOU WANT MORE HELP?' 

[6] nLEAVE IF NO MORE HELP WANTED 

[7] -^i-INYES) /Q 

[8] PRINT 'ENTER ONE OF THE FOLLOWING TYPES FOR THE STATE 
TRANSITION (P) MATRIX:' 

[9] PRINT " 

[10] PRINT ' GIVEN YOU WILL INPUT A P MATRIX, ONE ROW AT A 

TIME. ' ~ 

[11] PRINT ' ' 

[12] PRINT ' DEDFAIL METAPHOR WILL GENERATE A P Mathia 

ASSUMING THE MATRIX' ~ 

[13] PRINT ' REPRESENTS A SYSTEM HAVING N COMPONENTS , 

EACH FAILING' 
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C143 

[15] 

[16] 

[17] 

[18] 

[19] 

[ 20 ] 
[ 21 ] 
[ 22 ] 
[23] 
[2J+] 

[25] 

[26] 

[27] 

[28] 

[29] 

[30] 

[31] 

[32] 

[33] 
'[34] 

[35] 

[36] 

[37] 

[38] 

[391 

[40] 

[41] 

[42] 

[43] 

[44] 

[45] 

[46] 
[‘47] 


» INDEPENDENTLY AND EACH 

DISTINGUISHABLE . THE STATE' 

"///coMPomTs . . 

PRINT ' YOU WILL BE ASKED THE LENGTH OF THE 

PHASE AND THE FAILURE' 

PRINT ' RATE OF THE COMPONENTS .' 

PRINT ' ' 

PRINT ' NFAIL METAPHOR WILL GENERATE A P MATPTY 

ASSUMING THE MATRIX' - 

VllV ^ A SYSTEM HAVING M GROUPS OF 

KiM) COMPONENTS EACH . ' 

tYe^ItATE of THE' COMPONENTS FAIL INDEPENDENTLY AND 


PRINT ' 

FAILED) COMPONENTS^ 

PRINT ' 

NUMBER OF GROUPS,' 

PRINT ' 

THE LENGTH' 

PRINT ' 

THE COMPONENTS . « 

PRINT ' » 

PRINT ’ IDENTITY METAPHOR WILL GENERATE A P MATRIX 


SYSTEM IS THE NUMBER OF ACTIVE {NON- 
IN EACH GROUP. YOU WILL BE ASKED THE 
THE NUMBER OF COMPONENTS IN EACH GROUP, 
OF THE PHASE, AND THE FAILURE RATE OF 


REPRESENTS A SYSTEM IN WHICH THERE IS NO 
NO CHANGES IN STATES ARE MADE. THUS, 

AN IDENTITY MATRIX.' 


ASSUMING THE MATRIX' 

PRINT ' 

FAILURE, I.E.,' 

PRINT ' 

METAPHOR GENERATES' 

PRINT ' 

PRINT ' ' 

PRINT ' ' 

PRINT 'DO YOU WANT REFERENCES?' 

Ft LEAVE IF NOT 
-^(.-INYES) /O 

ANALYSIS^^SEE^'^^^^ PERFORM ABILITY MODELING AND 

PRINT ' ' * 

MEYER, "MODELS AND TECHNIQUES FOE EVALUATING 
^^RAN^'' PPPPCTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
^PlSlT »’ 1306., STATUS REPORT NO . 3, NOVEMBER 1977. » 

pKiUr PURTHER INFORMATION REGARDING METAPHOR , SEE' 

J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 


PRINT ' 
THE ' 
PRINT ' 
GRANT ' 
PRINT ' 
PRINT " 


effectiveness of AIRCRAFT COMPUTING SYSTEMS NASA 
NSG 1Z06, STATUS REPORT NO. ‘4, JULY 1973. « 
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[48] PRINT ^FOR FURTHER INFORMATION REGARDING APL , SEE' 

[43] PRINT »» 

[50] PRINT » 5. PAKIN , *MP£\360 REFERENCE MANUAL," SCIENCE 

RESEARCH ’ 

[51] PRINT ’ ASSOCIATES, INC CHICAGO, 1972.’ 

[52] PRINT ” 

V 


V Z-^GDEDFAIL N iT', LAMED A',INDEX\I\Ji SIZE ’, SUCCESS\FAIL 

[1] fl 

[2] ft ROUTINE FOR GENERATING THE D ED FAIL TYPE P MATRIX 

[3] ft THE MATRIX IS TO HAVE SHAPE Ny-N 

[4] ft 

[5] ft CHECK TO MAKE SURE THIS ROUTINE IS APPROPRIATE 

[6] ^((2®ZI?) = r(2©ff))/££J/7 

[7] ft PRINT EXPLANATION , NOTE FAILURE , 'AND EXIT 

[8] PRINT 'THE NUMBER .OF STATES IN DEDFAIL MUST BE A POWER OF 
TWO . ’ 

[9] {PRINT QUAD 'THIS PHASE HAS ') \ {PRINT QUAD N) iPRINTQUAD ' 
STATES . ' ) 

[10] PRINT ' ' _ 

[11] Z-*-{N,N)9 1 

[12] ->0 

[13] ft 

[14] ft GET PHASE LENGTH 

[15] GDINi PRINT 'ENTER PHASE LENGTH' 

[16] 1 INPUT 

[17] ft CHECK COMMAND 

[18] ->(1 = A e 'COMMAND' )/GDIN 

[19] ft CHECK FOR POSITIVE NUMBER 

[20] -^{IN>Q)/GDSETT 

[21] PRINT 'LENGTH IN TIME. MUST BE POSITIVE' 

[22] -^GDIN 
[23 ] ft 

[24] ft SET T TO PHASE LENGTH AND GET FAILURE RATE 

[25] GDSETTzT^IN 

[26] GDINL: PRINT 'ENTER COMPONENT FAILURE RATE' 

[27] 1 INPUT ^ 

[28] ft CHECK COMMAND 

[29] ^(1=A 

e 'COMMAND' )/ GDINL 

[30] ft CHECK FOR POSITIVE NUMBER 

[31] -*{IN>Q) / GDCHECKSIZE 

[32] PRINT 'RATE IN FAILURES PER UNIT TIME. MUST BE POSITIVE' 

[33] GDINL 

[34] ft CHECK REASONABLENESS OF FAILURE RATE 

[35] G^HECKSIZE‘.->-{{IN>lE lQ)A(Ijy<Q .1)) / GDSETL 

[36] ft PRINT MESSAGE CHECK TO MAKE SURE THE VALUE IS CORRECT 

[37] ^-^PRINTQUAD IN 
[3 8] -^{IN^O.D/GDLBIG 

C39] ^-<r-pRINTQUAD 'IS SMALL' 
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C41] 
U2 1 

C43] 

[44] 

[45] 

[46] 

[47] 

[48] 

[49] 

[50] 

[51] 

[52] 

[53] 

[54] 

[55] 

[56] 

[57] 

[58] 

[59] 

[60] 
[61 ] 
[62] 

[63] 

[64] 

[65] 

[ 66 ] 

[67] 

[ 68 ] 
[69] 


[ 1 ] 

[ 2 ] 

[3] 

[4] 

[5] 

[ 6 ] 

[7] 

[ 8 ] 

[9] 

[ 10 ] 

[ 11 ] 


■^GDLYESNOIIS 

GBLBIGx\:!^^PRINTQUAI) 'IS LARGE' 

G^LYESNOIN: PRINT » FOR A FAILURE RATE, DO YOU WANT THIS 
VALUE?' J-axo 

■*{~INYES) / GDINL 

H 


R SET LAMBDA TO 
GDSBTL : LAMBDA^IN 

n 


FAILURE RATE AND PERFORM CALCULATIONS 


R INITIALIZE THE P MATRIX 
pO 

R DETERMINE AN INDEX VECTOR FOR CALCULATING 
INDEX-<-)S{{ ( 2®N) a2)ENC0DE{N-\N) 

Pi 


THE P MATRIX 


R LOOP THROUGH INDEX TO CREATE P 

R INITIALIZE LOOPS 

J^l 

«7f-l 


fi DETERMINE THE NUMBER OF SUCCESS TRAN SITIONS 
GDLOOPx SIZE^^ / INDEXLI \ 1/INDEXX.J\ ] 

R FIND THE SUCCESS AND FAILURE PROBABILITIES 
FAIL^i 1 -*-LAMBDA>^T)*(,{+/INDEX[.IiJ)-SIZE) 

SUCC E SS'<^*~ LAMED Ax T>^ SI ZE 
ZLI I I1 -<-SUCCESSxFAILx{SIZE> + 

/INDEXl «T; ] ) X ( V /INDEX [ J • ] > INDEX [ cT ; ] ) 

R INCREMENT COLUMN COUNTER AND BRANCH IF APPROPRIATE 
J~^J + 1 

■*{J<N) /GDLOOP 

^APPRO%iTtE^^^ INCREMENT ROW COUNTER AND BRANCH IF 

J^l 


1^1+ X 

■*iI^N) /GDLOOP 


7 GDINFO 

Pi 

R ROUTINE GIVING HELP ON DEDFAIL TYPE P MATRIX 

Pi 

^SpREs' MiS^^'^^^ A P MATRIX ASSUMING THE MATRIX 

PRINT 'A SYSTEM HAVING N COMPONENTS , EACH FAILING 
INDEPENDENTLY AND EACH ' 

PRINT 'DISTINGUISHABLE . THE FAILURES ARE ALSO ASSUMED TO BE 

Iflll hofD\Z"lN f' 

PRINT 'THE STATE OF THE SYSTEM IS THE STATE OF EACH OF' 
pI?SE must NUMBER OF STATES DECLARED FOR THE 

PRINT 'A POWER OF TWO. YOU WILL BE ASKED THE LENGTH OF THE 
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PHASE % EH TER 

C12] PRINT ^SINGLE POSITIVE INTEGER. NEXT YOU WILL BE PROMPTED FOR 
THE FAILURE* 

[13 3 PRINT *RATE OF THE ' COMPONENTS . AGAIN ENTER A SINGLE POSITIVE 
NUMBER. IF * 

[14] PRINT *THIS NUMBER IS NOT BETWEEN l^“l AND l^“lO, YOU WILL BE 
ASKED FOR CONFIRMATION .* 

[15] PRINT ** 

[16] PRINT *D0 YOU WANT REFERENCES?* 

[17] R LEAVE IF NOT 

[18] -^(.-INYES) /Q 

[19] PRINT *FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE* 

[20] PRINT ** 

[21] PRINT * J. F. MEYER, ** MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

[22] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,** NASA 
GRANT ' 

[23] PRINT * NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1311.* 

[24] PRINT ** 

[25] PRINT *F0R FURTHER INFORMATION REGARDING METAPHOR, SEE* 

[26] PRINT »» 

[27] PRINT * J. F. MEYER, ** MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

[28] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ,* * NASA 
GRANT * 

[29] PRINT * NSG 1306, STATUS REPORT NO. 4, JULY 1978, » 

[30] PRINT ** 

[31] PRINT *FOR FURTHER INFORMATION REGARDING APL , SEE* 

[32] PRINT ** 

[33] PRINT * S. PAKIN , * * APL\Z3Q REFERENCE MANUAL ,* * SCIENCE 
RESEARCH* 

[34] PRINT ' ASSOCIATES,INC . , CHICAGO, 1972.' 

[35] PRINT ** 

V 


V Z-<-M GGIVEN NiROW 

[1] fl 

[2] R ROUTINE FOR INPUTTING CONSTANT MATRIX OF PROBABILITIES 

[3] fl EACH ROW MUST SUM TO ONE. THE MATRIX IS TO HAVE SHAPE 

M^N 

[4] n 

[5] R INITIALIZE THE MATRIX 

[6] Z^{M,N)pO 

[7] ft 

[8] ft INPUT AND CHECK THE MATRIX 

[9] PRINT * ENTER THE MATRIX, 1 ROW AT A TIME* 

[ 10 ] ft 

[11] R INITIALIZE ROW COUNTER 

[ 12 ] ROW-<ri 

[13] PRINT ** 
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Cl4: COIN ‘.^^{{PRINTQUAD 'ROW ' ) i iPRINTQUAD ROW) % FRUIT QUAD »;') 
Cl5] PRINT *' 

[163 fl GET ROW DATA 

[17] N INPUT £5 

[18 3 R CHECK -FOR COMMAND 

[19 3 ->(1 = A € ' COMMAND ' ) / GGIN 

[20 3 r<' CHECK VALIDITY OF INPUT. FIRST CHECK FOR PROBABILITIES 

[213 ^{CHECKPROB IN) / GGIN 

[223 fl CHECK THAT EACH ROW SUMS TO ONE. IF NOT. ASK AGAIN 
[23 3 /IN)=1) / GGINSERT 

[243 PRINT 'THE SUM OF PROBABILITIES IN EACH ROW MUST BE 1» 

[25 3 -^GGIN 
[263 n 

[273 R INSERT THE ROW INTO THE MATRIX 
[28 3 CGINSERTiZlROWi^-^IN 
[29 3 n 

[303 n INCREMENT ROW COUNTER AND BRANCH IF APPROPRIATE 
[313 ROW-^ROW-i-1 
[32 3 -^{ROW^M) / GGIN 

[3 3 3 ft ELSE LEAVE 
V 


V GGINFO 
[13 

[23 ft ROUTINE GIVING HELP ON INPUTTING GIVEN P MATRICES 
L 3 J ft 

[4 3 PRINT 'ENTER AN M^N ARRAY. ONE ROW AT A TIME. EACH ENTRY 
M US T * 

[53 PRINT 'BE BETWEEN 0 AND 1 INCLUSIVE AND TEE ENTRIES OF EACH 
ROW MUST SUM' 

[63 PRINT 'TO ONE. ENTER EACH ROW AS A SERIES OF N NUMBERS WITH 
SPACES AND/OR' 

[73 PRINT 'COMMAS BETWEEN EACH.' 

[83 PRINT 'EXAMPLE:' 

[93 PRINT ' .25 0.5..1 0.15' 

[103 PRINT 'HERE. THE MATRIX HAS FOUR ENTRIES PER ROW ' 

[113 PRINT " 

[123 PRINT 'DO YOU WANT REFERENCES?' 

[133 ft LEAVE IF NOT 
[14 3 ■*i~INYES)/Q 

[15 3 PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS. SEE' 

[163 PRINT ’» 

[173 PRINT ' J. F. MEYER, ''MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[183 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS '' NASA 
GRANT ' • * 

[193 PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.' 

[203 PRINT ' ’ 

mi further INFORMATION REGARDING METAPHOR. SEE' 

[22 3 PRINT ' ' ' 
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[23] PRINT ’ J, F. MEYER, MODELS AND TECHNIQUES FOR EVALUATING 
THE ’ 

[24- 3 PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
■ GRANT' 

[25] PRINT ♦ NSG 1308, STATUS REPORT NO. 4, JULY 1978. ♦ 

[26] PRINT » » 

[27] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[28] PRINT ' ' 

[29] PRINT ' S. PAKIN , "APL\360 REFERENCE MANUAL," SCIENCE 

RESEARCH' 

[30.] PRINT ' ASSOCIATES , INC ., CHICAGO, 1972.* 

[31] PRINT " 

V 


V Z^GIDENTITY N 

[1] fl “ 

[2] n ROUTINE FOR GENERATING AN N^-N IDENTITY MATRIX 

[3] fl 

[4] R RETURN THE MATRIX 

[5] .^) p( 1. (i7p0)) 

V ■ 


V Z-^GNFAIL N ’, T I LAMED Ai GROUPS %NUM % INDEX 1 1 ',J',COEFF', FAIL', SUCCESS 

[1 ] fl 

[2] fi ROUTINE FOR GENERATING THE NFAIL TYPE P MATRIX 

[3] fi THE MATRIX IS TO HAVE SHAPE N>^N 

[4] fl 

[5] fi GET PHASE LENGTH 

[6] GNINTi PRINT 'ENTER PHASE LENGTH' 

[7] 1 INPUT GN_ 

[8] fi CHECK COMMAND 

[ 9 ] ->•( 1 = A 

e 'COMMAND' )/ GN IN T 

[10] n CHECK FOR POSITIVE NUMBER 

[11] ■*{IN>Q)/GNSETT 

[12] PRINT 'LENGTH IN TIME. MUST BE PO SITIVE' 

[13] -*GNINT 
[14 ] fl 

[15] ft SET T TO PHASE LENGTH AND GET FAILURE RATE 

[16] GNSETT'.T*-IN 

[17] GNINL ; PRINT 'ENTER COMPONENT FAILURE RATE' 

[18] 1 INPUT Gl^ 

[19] ft CHECK COMMAND 

[20] ->-(l = A e 'COMMAND' ) /GNINL 

[21] ft CHECK FOR POSITIVE NUMBER 

[22] ->( Jjy>0 ) / GNCHECKSIZE 

[23] PRINT- 'RATE IN FAILURES PER UNIT TIME. MUST EE POSITIVE' 

[24] GNINL 

[25] ft CHECK REASONABLENESS OF FAILURE RATE 
[2 6] GNC HEC KSIZEi-*-{ (.INtlE~ 1 Q) ^{IN<0 . 1)) / GNSETL 
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3 n MESSAGE CHECK TO MAKE SURE THE VALUE IS CORRECT 

3 ]^-<-PRlNTQUAD m 

3 -^UH^O . 1 )/GHLBIG 
] \!^-^PRIRTQUAD 'IS SMALL' 

] '^GNLYESUOIN 

3 SipSIGi\^~<^PRIHTQUAI) 'IS LARGE' 

' ^ failure RAIS. DO WU WART ISIS 

1 ■^i^IRYES) /GEIWL 
I ft 

! assTiLlfsZta o^bee of groups 

i GNIHGi PRINT 'ENTER NUMBER OF GROUPS' 

I 1 INPUT G^ 

I ft CHECK COMM AN P 
I -^(a=A 

€ 'COMMAND' ')/ GN IN G 

ft CHECK FOR POSITIVE INTEGER 

■^(CSECKPOSI INy/GNING 

ft 

GRO^^ TO NUMBER OF GROUPS AND GET COMPONENTS , PER 

GROUPS-^ IN 

^INNiPRINT 'ENTER NUMBER OF COMPONENTS PER GROUP (SPACE 
BETWEEN EACH NUMBER) tC CPU UP (SPACE 

GROUPS INPUT GN_ 

ft CHECK COMMAND 

-»■ ( 1 = A e' COMMAND ' ) / GNINN 

ft CHECK FOR POSITIVE INTEGER 

■^(CHECKPOSI Iwy/G^INN 

ft CHECK FOR THE PROPER NUMBER OF STATES 
'^iN^>^fIN+l)/GNCALC 

\!^^{{PRINTQUAD 'THERE ARE ')% (.PRINT QUAD N) iPRINTQVAD ' STATES 

composes") 

PP Jills' 'NUMBER PLUS 11 MUST BE THE NUMBER OF STATES ' 

PRINT 'HOW MANY GROUPS' 

■^CNING 

ft 

WlloZf bofitioss for ihe comfosests is 

lUE GROUPS AND CALCULATE THE P MATRIX 
GNCALC:NUM^IN+1 


ft initialize THE P MATRIX 
Z-*-(N ^N) pO 

Jf B-^BCULATISG tse p matrix 

ft 

ft LOOP THROUGH INDEX TO CREATE P 
ft INITIALIZE LOOPS 
1^1 
J-^1 
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C76] fl FIRST DETERMINE THE PROBER COEFFICIENT FOR THE TERM UNDER 
CONSIDERATION 

111! GNLOOPiCOEFF^y^^INDEXUi UlNDEXHi ] ) 

[78] R MULTIPLY THE COEFFICIENT WITH THE PROPER EXPONENTIALS ' 

[79 j FAIL^i l-*-LAMBDA>^T)*{ + /INDEXZlil)-+ /INDEXUi ] 

[ 80 ] SUCCESS-^*- LAMED A^T^ i+/INDEXlJi ] ) 

[81] ZLliJl-'^COEFFxFAILx SUCCESS 

[82] ft INCREMENT COLUMN COUNTER AND BRANCH IF APPROPRIATE 

[83] J^J+1 

[84] -^U<N) /GNLOOP 

[85] ft RESET COLUMN COUNTER » INCREMENT ROW COUNTER AND BRANCH IF 
APPROPRIATE 

[86] J'f-1 

[87] I^I+l 

[ 88 ] -^il^N) /^LOOP 
V 


V GNINFO 

[1] ft 

[2] ft ROUTINE GIVING HELP ON NFAIL TYPE P MATRIX 

[3] ft 

[4] PRINT ^METAPHOR WILL GENERATE A P MATRIX ASSUMING THE MATRIX 
REPRESENTS A' 

[5] PRINT ^SYSTEM HAVING M GROUPS OF K{N) COMPONENTS EACH, WHERE K 
IS A » 

[6] PRINT ^FUNCTION OF THE GROUP. THE COMPONENTS FAIL 
INDEPENDENTLY' 

[7] PRINT 'AND ARE ASSUMED TO HAVE A POISSON DISTRIBUTION . ALSO, 
ONCE' 

[8] PRINT 'A COMPONENT HAS FAILED, IT CANNOT BECOME GOOD AGAIN.' 

[9] PRINT 'THE STATE OF TEE SYSTEM IS THE NUMBER OF ACTIVE 
COMPONENTS ' 

[10] PRINT 'IN EACH GROUP. THE NUMBER OF STATES DECLARED' 

[11] PRINT 'FOR THE PRASE MUST BE THE PRODUCT OF ITHE NUMBER OF 
COMPONENTS ' 

[12] PRINT 'IN EACH GROUP PLUS ONEl . FOR EXAM.PLE, IF THE SYSTEM 
HAS Z GROUPS' 

[13] PRINT 'CONTAINING RESPECTIVELY 2 , 5, AND 7 COMPONENTS , THEN 
THE PHASE HAS' 

[14] PRINT »(2+l)x(5 + l)x(7+l)-t-144 STATES. ' 

[15] PRINT ' ' 

[16] PRINT 'YOU WILL BE ASKED THE LENGTH OF THE PHASE-, ENTER A 
SINGLE POSITIVE INTEGER.' 

[17] PRINT 'NEXT YOU WILL BE PROMPTED FOR THE FAILURE RATE OF THE 

COMPONENTS . ' 

[18] PRINT 'AGAIN ENTER A SINGLE POSITIVE NUMBER. IF THIS NUMBER 
IS NOT BETWEEN' 

[19] PRINT '1E~X AND lff”l0, YOU WILL BE ASKED FOR 
CONFIRMATION . YOU WILL THEN ' 

[20] PRINT 'BE ASKED- THE NUMBER OF GROUPS', ENTER THIS' AS A SINGLE 
POSITIVE INTEGER.' 
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C21] PRIIHT 'FINALLY, METAPHOR WILL REQUEST THE NUMBER OF COMPONENTS 
IN EACH GROUP.' 

[22] PRINT 'THIS SHOULD BE INPUT AS A ROW OF POSITIVE INTEGERS 
SEPARATED BY ' 

[23] PRINT 'SPACES OR COMMAS.' 

[24] PRINT " 

[25] PRINT 'DO YOU WANT REFERENCES?' 

[26] Ft LEAVE IF NOT 

[27] -^i-INYES) /O 

[28] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[29] PRINT " 

[30] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[31] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[32] PRINT ' NSG 1306, STATUS REPORT NO. 3, NOVEMBER 1977.' 

[33] PRINT 

[34] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[35] PRINT " 

[36] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EV ALUATING 

THE ' 

[37] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT' 

[38] PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978.' 

[39] PRINT ' ' 

[40] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[ 41 ] PRINT ' '■ 

[42] PRINT ' S. PAKIN , " APL\ZZQ REFERENCE MANUAL," SCIENCE 

RESEARCH ' 

[43] PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.' 

[ 44 ] PRINT ' ' 

V 


TRAJECTORY SET EVALUATION FUNCTIONS 


V Z^GETACCLEVPROB LEVEL i T‘, TRAJPROB iNUMTRAJSETS 1 1 i Gi FiV 
[1 ] n 

!^2] Ft ROUTINE FOR DETERMINING THE PROBABILITY OF AN 

ACCOMPLISHMENT LEVEL 

[3] n 

[4] n INITIALIZE THE COLLECTION VARIABLE 

[5] Z-f-0 

[6] n 

[7] fi GET THE NUMBER OF TRAJECTORY SETS 

[8] NUMTRAJSETS^GETNUMTRAJ SETS LEVEL 

[9] ft LOOP THROUGH FOR EACH SET, GETTING ITS VALUES AND 
CALCULATING ITS PROBABILITY 

[10] R INITIALIZE COUNTER 

[ 11 ] 2^1 

[12] GAPT LOOPi\^-^{ {PRINT QUAD 'TRAJECTORY SET ' ) iFRINTQUAD T) 
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[13 3 PRINT »• 

I^GET^ECTOR 

[15] GET GM AT RICES 

[16] F^GETFVECTOR 

[ 17 ] V-*-GETVy ALVES 

[18] TRAJPROB-<-CALCTRAJPROB- 

[19] fl 

[20] n ADD THE PROBABILITY TO THE COLLECTION VARIABLE 

[21] Z^Z+TRAJPROB 

[22 ] fl 

[23] n INCREMENT TRAJECTORY COUNTER AND BRANCH IF NECESSARY 

[24] T^T+1 

[2 5] ->{T<^NUMTRAJSETS) / GAPTLOOP 
[26] n RESET DEFINITION FLAGS 
[2 7] DEFNUMTRAJSETS^DEFI^DEFG^DEFF*-DEFV^O 
7 


V Z-^GETNUMTRAJSETS L 

[1 ] PI • 

[2] fl 

[3] R ROUTINE FOR FETCHING THE NUMBER OF ACCOMPLISHMENT LEVEL 
TRAJECTORY SETS FOR LEVEL L 

[4] fl 

[5] n INPUT NUMBER OF TRAJECTORY SETS 
[ 6 ] PRINT ' ' 

[7] ]a\^{{PRINTQUAD ^ ACCOMPLISHMENT LEVEL ')\PRINTQUAD L-l) 

[8] PRINT ” 

[9] GNTSI N ! PRINT 'NUMBER OF TRAJECTORY SETS FOR THIS ACCOMPLISHMENT 

LEVEL?' 

[10] 1 INPUT GNTS 

[11] R CHECK FOR COMMAND 

[12] ->(1 = A 

e 'COMMAND' )/ GNTSIN 

[13] R CHECK VALIDITY OF INPUT 

[14] ^(CHECKPOSI IN) / GNTSI N 

[15] R ELSE SET THE NUMBER OF ACCOMPLISHMENT LEVELS AND EXIT 

[16] Z^IN 

[17] DEFNVMTRAJSETS^l 

V 


V GNTSINFO 

[ 1 ] 

[2] n ROUTINE GIVING HELP ON INPUTTING THE NUMBER OF 
TRAJECTORIES IN A GIVEN ACCOMPLISHMENT LEVEL 

[3] fl 

[4] PRINT 'ENTER THE NUMBER OF TRAJECTORY SETS ASSOCIATED WITH 
THIS ACCOMPLISHMENT' 

[5] PRINT 'LEVEL AS A SINGLE POSITIVE INTEGER.' 

[6] . PRINT 'EXAMPLE-.' 

[7] PRINT ' 4’ 
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[8] FRIRT 'THIS INFORMS METAPHOR THAT THE ACCOMPLISHMENT LEVEL HAS 
FOUR TRAJECTORY' 

[9] PRINT 'SETS DESCRIBING IT.' 

CIO] PRINT-" 

[11] PRINT 'DO YOU WANT REFERENCES?' 

[12] n LEAVE IF NOT 

[13] •^i-INYES) /O 

[14] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[15] PRINT ' ' 

[16] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
TEE ' 

[17] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[18] PRINT ' NSG 1306 , STATUS REPORT NO. 3, NOVEMBER 13‘77.' 

[19] PRINT ' ' 

[20] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[21] PRINT " 

[22] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[23] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT' 

[24] PRINT * NSG 1306, STATUS REPORT NO. 4, JULY 1978.’ 

[25] PRINT ' ' 

[26] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[27] PRINT ' ' 

[28] PRINT ' S. PAKIN , ”^PL\360 REFBRENC E M AN UAL , " SCIENCE 
RESEARCH ' 

[29] PRINT ' ASSOCIATES , INC . , CHICAGO, 1372.’ 

[30] PRINT ' ' ■ 

V 


V Z-^GETIVECTOR 

[1] fl ” 

[2] R ROUTINE FOR INPUTTING INITIAL STATE VECTOR 

[3] R 

OIVT N ‘.PRINT 'ENTER THE I VECTOR {SPACE BETWEEN EACH ENTRY) i' 

[6] STATESPERPHASELllINPUT GIV 

[7] R CHECK FOR COMMAND 

[8] ->-(l = A g ’ COMMAND ' ) / GIV I N 

[9] R CHECK VALIDITY OF INPUT. 

[10] -^{C EEC KB IN IN) /GIV IN 

[11] fl SET I VECTOR AND LEAVE 

[12] Z^^MAXNUMSTATESqIN AMAINUMSTATESpQ) 

[13] DEFI^l 

V 
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7 GIVINFO 

111 n 

l2l ft ROUTINE GIVING HELP ON INPUTTING I VECTORS 
C3j ft , 

C4] PRINT 'ENTER THE INITIAL PROBABILITY DISTRIBUTION FOR THIS 
TRAJECTORY . ' 

[53 PRINT 'TYPE A PROBABILITY BETWEEN ZERO AND ONE INCLUSIVE 
CORRESPONDING TO EACH' 

[6] PRINT ' STATE" S INITIAL PROBABILITY . SEPARATE EACH NUMBER 
WITH SPACES AND/OR COMMAS,' 

[73 PRINT 'THE ORDER OF THE ENTRIES SHOULD CORRESPOND TO THE ORDER 
OF THE INITIAL STATES,' 

[83 PRINT 'THE NUMBER OF ENTRIES SHOULD BE THE SAME AS THE NUMBER 
OF STATES' 

[93 PRINT 'IN THE FIRST PHASE MODEL.' 

[103 PRINT ' EXAMPLE : ' 

[113 PRINT ' .3 0.5,. 2’ 

[123 PRINT 'THIS INFORMS METAPHOR THAT FOR THE TRAJECTORY SET UNDER 
CONSIDERATION ^ THE' 

[133 PRINT 'PROBABILITY THE SYSTEM BEGINS IN THE FIRST STATE OF 
PHASE 1 IS 0.2. FOR THE' 

[143 PRINT 'SECOND STATE, THE PROBABILITY IS 0.5, AND FOR THE THIRD 
STATE, THE PROBABILITY' 

[153 PRINT 'IS 0.2.' 

[163 PRINT ' ' 

[173 PRINT 'DO YOU WANT REFERENCES?' 

[183 ft LEAVE IF NOT 
[19 3 ■^(.'-INYES'i /O 

[20 3 PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[213 PRINT ' ' 

[223 PRINT ' J. F, MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[233 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT' 

[243 PRINT ' NSG 1306, STATUS REPORT NO. 3. NOVEMBER 1977.' 

[253 PRINT " 

[263 PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[2 73 PRINT " 

[283 PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' 

[293 PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT' 

[303 PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 .' 

[313 PRINT " 

[323 PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[333 PRINT " 

[34 3 PRINT ' S. PA KIN , " APL\ZSQ REFERENCE MANUAL," SCIENCE 

RESEARCH ' 

[353 PRINT » ASSOCIATES , INC . , CHICAGO, 1972.' 

[363 PRINT " 

V 
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Cl] 

C2] 

[3] 

C4] 

C5] 

[ 6 ] 

[7] 

C8] 

C9] 

CIO] 

Cll] 

C12] 

C13] 

C14] 

CIS] 

Cl6] 

C17] 

C18] 

Cl9] 

C20] 

[ 21 ] 

[ 22 ] 

[23] 

[24] 

[25] 


V Z-^GETGMATRICES% PRASE 
a 

R ROUTINE FOR INPUTTING TEE G MATRICES FOR A' TRAJECTORY 
SET 

R EACH G MATRIX WILL BE REPRESENTED AS A VECTOR OF ITS 
DIAGONAL ELEMENTS 
a 

R INITIALIZE TEE G DIAGONAL MATRIX. ALSO SET DEFINITION 
FLAG 

Z-^ Cm AXNUM ST ATE S yMAXNUM STATES) pO 
DEFG^l 


a 

n LOOP TEROUGE EACE PEASE EXCEPT TEE LAST ^ GETTING TEE G 
MATRICES 

n INITIALIZE THE PHASE COUNTER 
PEASE^X 

a INPUT AND CHECK THE G VECTOR 

{PRINT QUAD ^PHASE ' ) %{PRINTQUAD PHASE)iPRINTQUAD 

PRINT »' 


PRINT CENTER THE G DIAGONAL {SPACE BETWEEN EACE ENTRY ) • » 
ST A TESPERPEA SElPHA SE ] INPUT GGM 
a CHECK FOR COMMAND 

-»-( 1 = A 


e '-COMMAND^ ) / GGMI N 
a CHECK VALIDITY OF INPUT. 

•^{CHECKBIN IN) / GGMI N 

a PLACE THE INPUT IN THE SET OF G VECTORS 
ZlPHASEixpINl-^IN 

a INCREMENT TEE PHASE COUNTER AND BRANCH IF APPROPRIATE 

PH A SE*- PHASE-t-1 

-^{PE A SE<NUM PEASES) /GGMIN 


V GGMIN FO 

[I] ■ a 

^2] a ROUTINE GIVING HELP ON INPUTTING G MATRICES 
l 3 3 fl 

[4] PRINT 'ENTER THE DIAGONAL OF TEE CHARACTERISTIC {G) MATRIX FOR 

THE PHASE UNDER CONSIDERATION.' ~ 

[5] PRINT 'EACH ENTRY SHOULD BE EITHER 0 OR 1 AND SHOULD BE 
SEPARATED FROM THE OTHER ' 

[6] PRINT 'ENTRIES BY SPACES AND/OR COMMAS. THE NUMBER OF ENTRIES 
SHOULD BE THE SAME' 

[7] PRINT 'AS THE NUMBER OF STATES FOR THE PHASE. ALSO THE ORDER 

OF THE ENTRIES SHOULD' uttut-K 

[8] PRINT 'CORRESPOND TO THE ORDER OF THE STATES AS CONSIDERED 
ELSEWHERE WITHIN THE' 

[9] PRINT ' METAPHOR PACKAGE FOR THE PHASE.' 

CIO] PRINT 'EXAMPLE:' 

[II] PRINT ' 0 0, 1,1 l» 
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[12] PRIBT 'THIS INFORMS MEIAPHOR THAT TEE CHARACTERISTIC MATRIX 
FOR THIS PHASE IS* 
tl3] PRIST * 00000* 

Cl43 PRIST * 0 O'O 0 0» 

CIS] PRIST * 00100* 

Cl6] PRIST * 00010* 

Cl7] PRIST * 00001 

CIS] PRIST * * 

[19] PRIST *DO 10 V WANT REFERENCES?* 

[20] n LEAVE IF NOT 

[ 21 ] ^{'•'INYES) /Q , 

[22] PRIST *FOR FURTHER INFORMATION ON PERFORMABILITI MODELING AND 
ANALISIS, SEE* 

[23] PRINT ** 

[2H-] PRINT * J. F. MEYER, ** MODELS AND TECHNIQUES 'FOR EVALUATING 
THE * 

[25] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS,** NASA 
GRANT * 

[26] PRINT * NSG 1306, STATUS REPORT NO, 3, NOVEMBER 1977 » 

[27] PRINT ** 

[28] PRINT *FOR FURTHER INFORMATION REGARDING METAPHOR, SEE* 

[29] PRINT ** 

[30] PRINT * J, F. MEYER, ** MODELS AND TECHNIQUES FOR EVALUATING 
THE * 

[31] PRINT * EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS ** NASA 
GRANT* 

[32] PRINT * NSG 1306, STATUS REPORT NO, 4, JULY 1978.* 

[33] PRINT ♦* 

[34] PRINT *FQR FURTHER INFORMATION REGARDING APL , SEE* 

[35] PRINT ** 

[36] PRINT * S, PARIS, * * APL\ZS0 REFERENCE MANUAL ,* * SCIENCE 
RESEARCH * 

[37] PRINT * ASSOCIATES, INC,, CHICAGO, 1372.* 

[38] PRINT ** 

V 


[ 1 ] 

[ 2 ] 

[3] 

[4] 
[S3 
[ 6 ] 

[7] 

[ 8 ] 

[9] 

[ 10 ] 
[113 
[ 12 ] 
[13] 


V Z^GETFVECTOR 
a 

fl ROUTINE FOR INPUTTING FINAL STATE VECTOR 

p[ 


fi INPUT AND CHECK THE F VECTOR 
GFVI N ; PRINT * ENTER THE F VECTOR {SPACE 
ST A TESPER PHASE IN UMPHA SESl INPUT GFV 
fi CHECK FOR COMMAND 
^Cl = A e* COMM AND* ') /GFVIN 
fi CHECK VALIDITY OF INPUT, 

^{CHECKS IN IN) /GFVIN 
ft SET F VECTOR AND LEAVE 
Z-^{MAXNUMSTATES ,1 ) pX^ , {UAXNUUSTATESpO) 
■DEFF^l 


BETWEEN EACH ENTRY) t 


1 


V 
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Cl] 

C2] 

[3] 

C4] 

C5] 

C6] 

[73 

C8] 

C9] 

CIO] 

Cll] 

C12] 

Cl3] 

Cl4] 

Cl5] 

ClG] 

C17] 

Cl8] 

[19] 

[ 20 ] 
[ 21 ] 
[ 22 ] 

[23] 

[24] 

[25] 

[26] 

[27] 

[28] 

[29] 

[30] 

[31] 

[32] 

[33] 

[34] 

[35] 

[36] 

[37] 

[38] 


V GFVnjFO 


ROUTINE GIVING HELP ON INPUTTING THE F VECTORS 

PiPJil/y ^ENTER THE CHARACTERISTIC {F) VECTOR FOR THE TRAJECTORY 
SET UNDER CONSIDERATION . ' ~ 

SHOULD BE EITHER Q OR 1 AND SHOULD BE 
SEPARATED FROM THE OTHER ENTRIES » 

?Lllls7s7f/fHf< ™ ‘^O^SIDERED 

PRINT ' METAPHOR PACKAGE FOR THE FINAL PHASE ' 

PRINT 'EXAMPLE'. ' 

PRINT ' 1 0, 1 ,0’ 

ll?iai7VAjEcloBf^' CHABACTERISTIC VECTOR 

PRINT 'SET IS' 

PRINT ' 1» 

PRINT ' 0 ' 

PRINT ' 1' 

PRINT ' 0 . » 

PRINT ' ♦ 

PRINT 'DO YOU WANT REFERENCES?' 

R LEAVE IF NOT 
■*{~INYES) /O 

TnYlYs'/s^^ SEE^'’^^^^ ON PERFORM ABILITY MODELING AND 

PRINT ' ' * 

^^^ER, "MODELS AND TECHNIQUES FOR EVALUATING 

^P^ANT'" OF AIRCRAFT COMPUTING SYSTEMS," NASA 

PRINT '» 1306, STATUS REPORT NO. 3, NOVEMBER 1977.’ 

FURTHER INFORMATION REGARDING METAPHOR , SEE' 

^^^ER, "MODELS AND TECHNIQUES FOR EVALUATING 

G^RAN^T'' OF AIRCRAFT COMPUTING SYSTEMS," NASA 

PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 ’ 

PRINT " • ouiai IS /a. 

PRINT 'FOR FURTHER INFORMATION REGARDING APL SEE' 

PRINT ' ' 

RfsEARCH' "APL\Z ^0 REFERENCE MANUAL," SCIENCE 

PRINT ' ASSOCIATES , INC ., CHICAGO, 1972 • 

PRINT " 
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V Z^GETVVALUESiGVVTRUEiGVVFALSE 

Cl] n 

C2] fi ROUTINE FOR INPUTTING TIME-INV ARIANT BASIC VARIABLE 
PROBABILITIES 
[3] fl 

C4] fi INPUT AND CHECK THE V VECTOR 

C5] fi IF NO TIME-INVARIANT BASIC VARIABLES ^ THEN SET F-*-0 , TURN ON 
THE DEFINITION FLAG, AND EXIT 
C 6 ] Z-^0 

[7] DEFV^t 

[8] -*{NUMBASICVARIABLES=Q)/Q 

C9] GVVI Nt\^-<-i {PRINT QUAD 'ENTER THE ' )--APRINTQUAD 

NUMB ASICVARI ABLE S) i PRINT QUAD ' ELEMENT TIME-INV ARIANT BASIC 
VARIABLE VECTOR {SPACE BETWEEN EACH ENTRY) j ' ) 

CIO] PRINT ' ' 

Cll] NUMBASICVARIABLES INPUT GW 
Cl2] R CHECK FOR COMMAND 
C 13 ] ■*{ 1 = A 

e 'COMMAND' )/ GVVI N 
Cl4] fl CHECK VALIDITY OF INPUT. 

Cl 5] -^{CHECKTRI IN) / GW IN 
Cl 6] fl SET V VECTOR 
Cl 7] R FIRST, SET THE TRUE VECTOR 
Cl8] GVVTRUE-^IN€ 0 2 
Cl 9] R THEN SET THE FALSE VECTOR 
C2 0] GVVF ALSE->-nU 1 2 
C21] n COMBINE FOR THE V VECTOR 
C22 ] Z^ GW T RUE , GWF ALSE 
V 


Cl] 

C2] 

C3] 

C4] 

C5] 

C6] 

C7] 

C8] 

C9] 

CIO] 

Cll] 

Cl2] 

Cl3] 

C14] 


V GVVI NFO 

R 

R ROUTINE GIVING HELP ON INPUTTING THE TIME- INV ARIANT BASIC 
VARIABLE VECTOR 

R 

PRINT 'ENTER A VECTOR OF Q" S , 1' ' S , AND 2' ' S TO INDICATE 
WHETHER THE ' 

PRINT 'TIME- INV ARIANT BASIC' VARIABLE" S OCCURRENCES OR NON- 
OCCURRENCES SHOULD BE' 

PRINT 'CONSIDERED IN THE TRAJECTORY SET. THE CODING IS AS 
FOLLOWS-. ' 

PRINT " 

PRINT ' 0 

OCCURRENCE SHOULD' 

PRINT ' 

PRINT " 

PRINT ' 1 

OCCURRENCE' 

PRINT ' 

PRINT " 

PRINT ' 2 


THE CORRESPONDING BASIC VARIABLE" S 
BE CONSIDERED' 

THE CORRESPONDING BASIC VARIABLE" S NON- 
SHOULD BE CONSIDERED' 

EITHER THE OCCURRENCE OR NON -OCCURRENCE 
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OF THE » 

Cl 5] PRINT ' CORRESPONDING BASIC VARIABLE SHOULD BE 

CONSIDERED' 

[16] PRINT ♦ iI,E., THE BASIC VARIABLE IS A "DONT"T 

CARE 

[17] PRINT »> 

[18] PRINT 'ENTER A ROW OF 0" S , 1" S , AND 2" S , SEPARATING EACH 
ENTRY BY SPACES' 

[19] PRINT 'AND/OR COMMAS: THE NUMBER OF ENTRIES SHOULD BE THE 

SAME AS THE ' 

[20] PRINT 'NUMBER OF TIME- INV ARIANT BASIC VARIABLES DECLARED 
EARLIER. ALSO THE ORDER' 

[21] PRINT 'OF THE ENTRIES SHOULD CORRESPOND- TO THE ORDER OF THE 
BASIC VARIABLES' 

[22] PRINT 'AS CONSIDERED ELSEWHERE IN THE METAPHOR PACKAGE.' 

[23] PRINT 'EXAMPLE'.' 

[24] PRINT ' 0,1 1 , 2’ 

[25] PRINT 'THIS INDICATES TO METAPHOR THAT FOR THIS TRAJECTORY 
SET, THE OCCURRENCE' 

[26] PRINT 'OF THE FIRST TIME- INV ARI ANT BASIC VARIABLE IS IMPORTANT 
TO THE TRAJECTORY' 

[27] PRINT 'SET, THE NON -OCCURRENCE OF THE SECOND AND THIRD TIME- 
INVARIANT 5^351^ VARIABLES' 

[28] PRINT 'IS IMPORTANT , AND THAT THE FOURTH TIME- INV ARI AN T BASIC 
VARIABLE IS IRRELEVANT .' 

[29] PRINT " 

[30] PRINT 'DO YOU WANT REFERENCES?' 

[31] ft LEAVE IE NOT 

[32] ^{-INYES) /Q 

[33] PRINT 'FOR FURTHER INFORMATION ON PERFORM ABILITY MODELING AND 
ANALYSIS, SEE' 

[34] PRINT " 

[35] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 
THE ' 

[36] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS NASA 
GRANT ' 

[37] PRINT ' NSG 1306, STATUS REPORT NO . 3, NOVEMBER 1977.' 

[38] PRINT ' ' 

[39] PRINT 'FOR FURTHER INFORMATION REGARDING METAPHOR, SEE' 

[40] PRINT " 

[41] PRINT ' J. F. MEYER, "MODELS AND TECHNIQUES FOR EVALUATING 

THE ' ‘ 

[42] PRINT ' EFFECTIVENESS OF AIRCRAFT COMPUTING SYSTEMS," NASA 
GRANT ' 

[43] PRINT ' NSG 1306, STATUS REPORT NO. 4, JULY 1978 » 

[ 44 ] PRINT ' ' 

[45] PRINT 'FOR FURTHER INFORMATION REGARDING APL , SEE' 

[46] PRINT " 

[47] PRINT ' S. PAKIN , " APL\ZS0 REFERENCE MANUAL ," SCIENCE 
RESEARCH' 

[48] PRINT ' ASSOCIATES , INC . , CHICAGO, 1972.’ 

[49] PRINT " 
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■ V 


V Z-^CALCTRAJPROBiJ\PEASB 

111 a 

[23 fl CALCULATES THE PWBABILITl OF THE GIVER TRAJECTORY- 
[33 a 

C43 ft COMPUTE TEE INITIAL PHASE PROBABILITY 

[53 2-*-r+.xpCl;;3 

[63 fi 

[7] ft LOOP THROUGH THE OTHER PHASES 
[83 ft INITIALIZE PHASE COUNTER 
[93 PHASE^2 

[103 fi FIRST CONSIDER THE SUCCESS STATES MATRIX 

[113 CTPLOOPzZ-*-Zy^G[.PHASE-l\l 

[123 a THEN THE INTERPHASE MATRIX 

[13 3 Z^Z^,^RtPEASE-liO 

[143 a TEEN THE TRANSITION MATRIX 

[15 3 Z^Z-^.y^PlPEASEiil ■ 

[16 3 ft 

[173 a INCREMENT PHASE COUNTER AND BRANCH IF APPROPRIATE 

[183 PEA SE^PHA SE + 1 

[19 3 -^-iPEASE^NUMPHASES) / CfPL OOP 

[203 ft 

[213 a POST-MULTIPLY BY FINAL STATE 
[223 Z-^Z+.xF 

[23 3 ft FINALLY^ MULTIPLY BY THE TIME- INV ARI ANT BASIC VARIABLE 
PROBABILITIES 

[243 a IF NO TIME- INV ARI ANT BASIC VARIABLES^ EXIT 
[25 3 ->(.NUMBASICVARIABLES=Q')/Q 
[26 3 Z^Z^+'/V^BASICVARIABLES 
7 

ML CHECKING FUNCTIONS 


V SHAPE INPUT ROUTINE iCOMMANDVECTOR 
[13 ft 

[23 a ROUTINE FOR INPUTTING ANSWERS. INPUT CAN BE DATA OR 
COMMANDS. 

[3 3 ft IF NUMERIC^ DATA RETURNED IN 'IN' , ELSE IF COMMAND, 

'COMMAND' RETURNED 
[43 ft 

[53 a GET INPUT 
[6 3 mNtlN^n 

[73 a ECHO INPUT IF DESIRED 

[83 -> ( -ECHO IN PVT ) MOTORIZE 

[93 ]}\^(.{PRINTQUAD ')•, PRINT QUAD IN) 

[103 PRINT " 

[111 ft 

[123 a CHANGE ALL SCALAR INPUTS TO VECTORS 
[133 INVECTORIZE:IN^>IN 
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[14-3 fi 

Cl 5] ft CHECK FOR COMMAND AND SET COMMAND VECTOR 
[16] COMM AN DV EC TO R*-^ / COMM AND LIST ^IN 
C17] ft 
Cl8] ft 

[19] ft EXECUTE COMMAND IF PRESENT 

[20] INCOMMAND :^{COMMANDVECTOR) / INEELP , INEXIT ^INDATA . 

IN ALTER ,INCALC yINECHO ^INBRIEF ^INCOM ,INEVAL 

[21] ft ELSE CHECK THE SHAPE OF THE INPUT. ^ SHAPE' IS ALWAYS AN 
INTEGER SCALAR. IF GOOD, LEAVE. 

[22] -^iSHAPE-pIN) 

[23] ft OTHERWISE THE INPUT WAS OF THE WRONG DIMENSION. PRINT ERROR 
MESSAGE AND TRY AGAIN . 

[21}-] \^-^{.(,PRINTQUAD 'ENTER ' ) \{PRINTQUAD SHAPE) 'PRINT QUAD ' 

ITEMS' ) 

[25] ->-ININ 

[26] -J-0 

[27] ft 

[28] ft 

[29] ft HELP REQUESTED 

[30] IN HELP-. COMMANDH ELP ROUTINE 

[31] IN^ ' COMMAND ' 

[32] ->0 

[33] ft 

[34] ft 

[35] ft END THE PROGRAM 

[36] ^EXITi^ 

[37] ft 

[38] ft 

[39] ft DISPLAY OF DATA REQUESTED 

[ 40 ] INDATA ; COMMANDO AT A 

[41] IN^' COMMAND' 

[42] -►O 
[43 ] ft 

[44] ft 

[45] ft CHANGE OF DATA REQUESTED 

[46] IN ALTER'. COMM ANDA LTER 

[47] IN-^' COMMAND' 

[48] ->0 

[49] ft 
[50 ] ft 

[51] ft CALCULATION OF PERFORM ABILITY REQUESTED 

[52] INC ALCz COMMANDO ALC 

[53] IN'i-' COMMAND' 

[ 54 ] ^0 

[ 55 ] ft 

[56] ft SETTING OF THE ECHO SWITCH DESIRED 

[57] IN EC HO '.COMM AN DEC HO IN 

[58] IN-<-' COMMAND' 

[59] ^0 

[ 60 ] ft 

[61] ft COMMENT DESIRED 
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C62] IN COM '. COMM All DC OM 

[63] COMMAND' 

[64] -»-0 

[65] fl 

[66] fl SETTING OF BRIEF SNITCR DESIRED 

[67] IN BRIE Fi COMMANDB RIEF IN 

[68] IN^' COMMAND' 

[69] ^0 

[70] fl 

[71] n PERFORM ABILITY COMPUTATION DESIRED 

[72] INEVALzCOMMANDEVAL 

[73] ^0 
V 


7 Zf IN YE Si IN 

[1] fl 

[2] fi ROUTINE ASKING YES AND NO ANSWERS, 1 RETURNED IF YES, 0 IF 
NO 

[3] ft 

[4] fi PRINT PROMPT AND GET ANSWER 

[5] lYIN ; PRINT '0:' 

[ 6 ] 

[7] n ECHO THE INPUT IF DESIRED 

[8] -^(.^ECHOINPUT) / lYSCAN 

[9] PRINTIN') 

[10] fi ASSUME YES HAS PRIORITY. LOOK FOR Y OR 1 

[11] lYSCANz Z^v/'Yl' ^IN 

[12] n IF N OR 0 INPUT OR IF YES INPUT, EXIT 

[13] ->(Zvv/»ii/o’ eJi7)/0 

[14] R ELSE TRY AGAIN 

[15] PRINT 'ENTER YES OR NO' 

[16] ->-IYIN 
V 


V Z^CHECKBIN CHECKNO 

[1] fi 

[2] fi RETURN 0 IF CHECKNO CONTAINS ONLY BINARY ZEROS AND ONES 

[3] fi ELSE PRINT MESSAGE AND RETURN 1 

[4] ft 

[5] n CHECK FOR PROPER BINARY ELEMENTS 

[6] Z^~{.h/CHECKNOe. 0 1) 

[7] ->(~Z)/0 

[8] PRINT 'EACH ENTRY MUST BE EITHER 0 OR X' 

[9] ^0 

V 
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V Z-^CHECKPOSI CHBCKEO 

Cl] ft 

C2] n RETURE 0 IF CHECKEO IS A POSITIVE lETEGER. ELSE PRINT 
MESSAGE AND RETURN 1 

[3] n 

[4] n GRECE FOR POSITIVENESS 

[5 3 {CHECKNO>Q) 

C6] ^{~Z) / CHECKI NT 

[7] PRINT ^ INPUT NOT POSITIVE' 

[ 8 ] ^0 
[93 ft 

[103 ft CHECK FOR INTEGER 

[113 CHECKI NTi Z^'-a/CHECKNO~ VCNECENn 

[123 -»-(~2)/0 

[133 PRINT 'INPUT NOT AN INTEGER' 

V 


V Z*-CHECKPROB CBECKNO 
[13 ft 

1^2 3 ft RETURN 0 IF CHECKNO IS BETWEEN 0 AND 1 INCLUSIVE ELSE 
PRINT MESSAGE AND RETURN 1 
[33 ft 

[43 ft CHECK FOR PROPER RANGE 
[5 3 ^/CHECKNO>0 ) ^(. /^/ CHEC KN0<1 ) 

[ 6 ] ^(~ Z )/0 

[73 PRINT 'INPUT NOT BETWEEN 0 AND 1' 

V 


7 Z-<^CHECKTRI CHECKNO 

[13 ft 

[23 ft RETURN 0 IF CHECKNO CONTAINS ONLY TRINARY ZEROS, ONES AND 

[33 ft ELSE PRINT MESSAGE AND RETURN 1 

[43 ft 

[53 ft CHECK FOR PROPER TRINARY ELEMENTS 
[63 Z^~{a/CHECKNO€ 012) 

[73 -^(~Z)/0 

[8] PRINT 'EACH ENTRY MUST BE EITHER 0,1, OR 2' 

[93 ->0 

V 
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V Z^FRIIIT Q 

Cl] fl 
C2] fi 

C3] fi PRINTING ROUTINE FOR METAPHOR 

[4] n IF BRIEF-<-l £0 OUTPUT IS GIVER 

[5] n 

[6] n CHECK FOR TERSE INPUT FLAG 

C 7 ] ->( BRIEFO UTPUT= 1 ) / 0 

[8] R FULL OUTPUT DESIRED, GIVE IT AND LEAVE 
C 9 ] Z^Q 
7 


7 Z^PRINTQUAD Q 
Cl] fl 
C2] fl 

C3] fl PRINTING ROUTINE {WITH QUOTE QUAD) FOR METAPHOR 
C4] fl JF BRIEF^l NO OUTPUT IS GIVEN 

C5] fl — 

C6] fl CHECK FOR TERSE INPUT FLAG 

C 7 ] -^{BRIEF0UTPUT=1) / PRINT QU ADBRIEF 

C8] R FULL OUTPUT DESIRED, GIVE IT AND LEAVE 

C9] Z-^Q 

CIO] ^0 

Cll] R ELSE RETURN THE EMPTY STRING 
Cl2]. PQBRIEFxZ-^' » 

7 

APL SUPPORT FUNCTION 


7 Z-^M ENCODE N',R0W 
Cl] fl 
C2] fl 

C3] fl THE ENCODE FUNCTION EMPLOYED ON MTS WILL NOT ACCEPT 
VECTORS AS 

C4] fl ARGUMENTS ON THE RIGHT HAND SIDE. THIS FUNCTION SIMULATES 
THAT CAPABILITY 

[5] fi THE COMPARABLE APL NOTATION WOULD BEi MjN 
C6] ft 

C7] ft TEST FOR A SINGLE INPUT 
C8] ■^{■Q = ppN) /^SINGLE 

C9] fi INITIALIZE THE ARRAY AND LOOP COUNTER 
CIO] Z-*-( (C/l,pi^) ,(pZ/) )p0 
Cll] COL*^! 

Cl2] EL00PiZi‘,C0L'^^MyNlC0L'\ 

Cl 3] COL^COL+1 
Cl4] ^{COL^pN) /ELOOP 
Cl5] fi EXIT 
C 1 6 ] ->0 

Cl7] ft 

Cl 8] n IF ONLY ONE ARGUMENT TO BE DECODED 
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Cl9: ^SINGLE iZ^MjN 
7 
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INDEX 


A, prefix for labels in the 

function COMMANDA LTER, 6 
Abbreviations, of definition 
flags, 19 
of labels, 5-6 
ACC'LEV, abbreviation for ' 

ACCOMPLISHMENT LEVEL, 5 
ACCLEVEL, definition flag for, 
19 

Accomplishment level, 2 
abbreviation for, 5 
Algorithm, EVAL, 25 
Alphabetical ordering, 3 
ALTER, control and information 
exchange techniques for, 
17 

description of METAPHOR 
variable, 47 
METAPHOR variable, 70 
ALTERVECTOR, index code for, 83 
APL, 2,6 

APL support function, 187 

Ballance, R. A., 1 
Base model, 1 

Base model trajectory set, 2 
BASICVARIABLES, definition flag 
for, 19 

description of METAPHOR 
variable, 47 

METAPHOR variable, 64,85 
BIN, abbreviation for BINARY, 5 
Binary, abbreviation for, 5 
BRIEF, description of METAPHOR 
variable, 47 
METAPHOR command, 11- 

12,47,63,70,110,115,117,1 
184,190,194,199, 236,238 
METAPHOR function, 

4,10,12,51,54,63,186,199 
METAPHOR function 
description, 63 
BRIEPQUTPUT, description of 
METAPHOR variable, 47 
METAPHOR variable, 70,115- 
117, 119, 122' 


CALC, abbreviation for CALCULATE 
, 5 

description of METAPHOR 
variable, 47 
METAPHOR variable, 70 
CALCTRAJPROB , abbreviation for 
labels in, 6 

METAPHOR function, 6,47,49- 
51,64,82,187, 226,234 
METAPHOR function 
description, 64 

Calculate, abbreviation for, 5 
Capability function, 2 
CC, prefix for labels in the 
function COMMANDC OM, 6 
CCALC , prefix for labels in the 
function COMMANDC ALC , 6 
CHECK , prefix for labels in the 
function CHECKPOSI, 6 
Prefix for METAPHOR function 
names, 4 

CHECKBIN, METAPHOR function, 
7,47,51,66,98- 
100,103,106,115,187,227,2 
230,236 

METAPHOR function 
description, 66 

CHECKNO, description of METAPHOR 
variable, 47 

CHECKPOSI, abbreviation for 
labels in, 6 
METAPHOR function, 
6,47,51,67,90- 
93,97,115,145,187,205- 
206,209, 212, 223, 226, 237 
METAPHOR function 
description, 67 
CHECKPROB, METAPHOR function, 

4,47,68,85, 115,139,187, 21 
METAPHOR function 
description, 68 
CHECKTRI, METAPHOR function, 

47, 51, 69, 107, 115,187, 232, 
METAPHOR function 
description, 69 
Clarity, 8 

Code, index code for ALTERVECTOR 
, 17,83 
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index code for DATA VECTOR, 
18,87 

Code names, for functions (for 
use with the HELP 
command) , 15 

Code values, for functions (for 
use with the HELP 
command) , 15 

COM, abbreviation for COMMENT, 5 
description of METAPHOR 
variable, 47 
METAPHOR variable, 70 
COMMAND, Prefix for METAPHOR 
function names, 4 
COMMAHDA LTER , abbreviation for 
labels in, 6 

METAPHOR function, 4,6,17- 

21.48- 49,83,108- 
109,115,118- 

119.186.191.235 
METAPHOR function 

description, 118 

COMMANDS R IE F , METAPHOR function, 
12,47,108,110,115,117,122 
METAPHOR function 
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